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IDENTIFICATION 



PRODUCT CODE; 
PRODUCT NAME; 
DATE : 

MAINTAINER: 
AUTHOR : 



AC-F6U»;-«C 

CKKTBDO 11/44 MEM M6MT PRT B 
JANUARY, 1 982 
DIAGNOSTIC ENGINEERING 
DAN P. MILIEVILLE 



THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS 
DOCUMENT. 

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM 
AND CAN BE COPIED (WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) 
ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED 
IN WRITING BY DIGITAL. 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT 
THAT IS NOT SUPPLIED BY DIGITAL. 

COPYRIGHT (C) 1979, 1982 BY DIGITAL EQUIPMENT CORPORATION 
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43 
44 
45 
46 
47 
48 
49 
50 
51 
52 
53 
54 
55 



PROGRAM HISTORY 



DATE 

OCTOBER. 1979 
DECEMBER. 1979 
APRIL. 1981 



JANUARY. 1982 



REVISION 

A 
B 
C 



REASON FOR REVISION 

FIRST RELEASE 

ADDITION OF 'CSM' TEST 35 

USING NEW SYSMAC WITH *Q CHECKS AND BIT CHECK 
OF THE POWER MONITOR BIT OF CPUERR REGISTER. 
MODIFIED CODE TO ACCOMODATE ECO # 8. 
ECO * 8 WAS MODIFIED. CODE CHANGED TO REFLECT 
THE MODIFICATION. 
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58 
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61 

62 

63 
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66 
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69 

70 

U 3.0 
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77 

78 4.0 

79 

80 

81 

82 

83 

84 

85 5.0 

86 

87 

88 



D 1 

-JAN-82 12:19 PAGE 4 



SEQUENCE 3 



TABLE OF CONTENTS 



PROGRAM INFORMATION 

1.1 ABSTRACT 

1.2 REQUIREMENTS 

1.3 RELATED DOCUMENTS AND STANDARDS 

1.4 PRELIMINARY PROGRAMS 

OPERATING INSTRUCTIONS 

2.1 LOADING PROCEDURES 

2.2 STARTING PROCEDURES 

2.3 OPERATIONAL SWITCH SETTINGS 

2.4 LOADING THE SWITCH REGISTER 

2.5 EXECUTION TIMES 

ERROR INFORMATION 

3.1 ERROR REPORTING PROCEDURES 

3.2 INTERPRETING ERROR REPORTS 

3.3 SAMPLE ERROR REPORT 

3.4 POWER MONITOR BIT ERRORS 

MISCELLANEOUS INFORMATION 

4.1 ACT/APT/XXDP COMPATABILI TY 

4.2 END-OF-PASS MESSAGE 

4.3 T-8IT TRAPPING 

4.4 POWER FAILURE HANDLING 

4.5 PHYSICAL BUS ADDRESS CONSTRUCTION 

PROGRAM DESCRIPTION 

5.1 SUBROUTINES USED BY THIS PROGRAM 

5.2 PROGRAM LISTING 

5.3 USING THE PROGRAM TO DIAGNOSE A FAULT 



E 1 

:kkTBDO 11/^4 MEM MGMT PRT B HACRO HlllS 12-JAN-82 12:19 PAGE 5 SEQUENCE 

90 1.0 PROGRAM INFORMATION 

91 

92 

93 1.1 ABSTRACT 

94 

95 

96 THIS PROGRAM WAS DESIGNED USING A 'BOTTOM UP" APPROACH 

97 STARTING WITH THE SMALLEST SEGMENT OF MEMORV MANAGMENT 

98 LOGIC POSSIBLE AND BUILDING TO COVER ALL OF THE LOGIC. 

99 THE DIAGNOSTIC WILL PROVIDE ENOUGH INFORMATION SUCH THAT 

100 BV DEDUCTION, THE FAILURE CAN BE ISOLATED TO A SMALL 

101 SEGMENT OF THE MEMORY MANAGEMENT LOGIC. 

103 PART A BEGINS BY TESTING SOME OF THE INTERNAL CPU DATA 

104 AND ADDRESS PATHS AND ADDRESS DETECTION LOGIC. THEN 

105 WORKS OUTWARD THROUGH THE MEMORY MANAGEMENT REGISTERS. 

106 AFTER THE REGISTERS ARE FOUND TO BE USEABLE, RELOCATION 

107 (CONSTRUCTION OF PHYSICAL ADDRESSES FROM A VIRTUAL ADDRESS 

108 AND THE ASSOCIATED PAR/PDR INFORMATION) IS TESTED. PART B 

109 BEGINS BY TESTING THE ABORT AND STATUS SEGMENTS OF LOGIC. 

110 PART B THEN CHECKS THE SPECIAL ABORT SEQUENCES, THE MFPI/MTPI 

111 INSTRUCTIONS AND THE CSM INSTRUCTION. 
112 

113 1.2 REQUIREMENTS 

1U 

116 A PDP 11/44 PROCESSOR WITH A MINIMUM OF 16K OF MEMORY 

117 AND A CONSOLE TERMINAL ARE REQUIRED TO RUN THE PROGRAM 

118 UNLESS THE PROGRAM IS RUNNING UNDER APT OR ACT IN WHICH 

119 CASE THE CONSOLE TERMINAL IS NOT NECESSARY. 
120 

121 1.3 RELATED DOCUMENTS AND STANDARDS 

122 

124 1. ACT11/XXDP PROGRAMMING SPECIFICATION 

125 2. STANDARD APT SYSTEM TO A PDP11 DIAGNOSTIC INTERFACE 

126 3. DIA6N0SITC ENGINEERING STANDARDS AND CONVENTIONS 

127 4. PDP11 MAINDEC SYSMAC PACKAGE 

128 5. XXDP USER'S MANUAL 
129 

130 1.4 PRELIMINARY PROGRAMS 

131 

132 

133 BEFORE THIS MEMORY MANAGEMENT DIAGNOSITC IS RUN, THE 

134 FOLLOWING DIAGNOSTICS SHOULD BE RUN: 
135 

136 CKKAAAO 11/4 CPU/EIS 

137 CKKA8A0 TRAPS 
138 

139 ALSO. THE MAIN MEMORY DIAGNOSTIC (CZMSD) SHOULD BE RUN TO SCAN 

140 AT LEAST THE FIRST 16K TO SEE THAT A PROGRAM CAN BE EXECUTED. 
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141 2.0 OPERATING INSTRUCTIONS 

142 

144 2.1 LOADING PROCEDURES 

145 

147 THE PROGRAM IS SUPPLIED ON THE DIAGNOSTIC LOAD MEDIA. 

UP REFtR TO THE XXDP USER'S MANUAL FOR FURTHER INFORMATION. 

149 FOR USE WITH ACT OR APT, REFER TO THEIR RESPECTIVE 

150 DOCUMENTS. THE PROGRAM CAN ALSO BE DIRECTLY LOADED 

151 USING THE ABSOLUTE LOADER AND THE BINARY PAPER TAPE. 

153 2.2 STARTING PROCEDURES 

154 

156 THE PROGRAM IS STARTED BY LOADING ADDRESS 200 AND 

157 STARTING. THE SWITCH REGISTER SHOULD BE SET ACCORDING TO 

158 SECTION 2.3 BEFORE THE PROGRAM IS STARTED. HOWEVER, IF 

159 DESIRED, THE PROGRAM WILL USE THE SOFTWARE SWITCH REGISTER 

160 AT LOCATION 176 (LOCATION 174 WILL BE USED AS THE SOFTWARE 

161 DISPLAY REGISTER). IN THAT CASE. THE PROGRAM WILL AfK FOR 

162 THE INITIAL SWITCH REGISTER VALUE BY TYPING "SWRr XXXXXX 
63 NEW= " AFTER TYPING THE NAME OF THE PROGRAM (XXXXXX = 

164 THE OCTAL CONTENTS OF LOCATION 176). (SEE SECTION 2.4) 

166 ALSO THE PROGRAM CAN BE MADE TO USE THE SOFTWARE SWITCH 

167 REG. EVEN IF THE CONSOLE SWITCH REG. IS PRESENT BY LOADING 

168 "]77?77" INTO THE CONSOLE SWITCH REG. BEFORE STARTING 

169 THE PROGRAM. 
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170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 

181 

182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 

201 

202 

203 

204 

205 

206 

207 

208 

209 

210 

211 

212 

213 

214 

215 

216 



2.3 CONTROL SWITCH SETTINGS 

SWITCH OCTAL VALUE 
SW15~ 100000 



USE 



SWU 



040000 



SW13 020000 



SW12 010000 



SW10 002000 



SW9 



SW8 



001000 



000400 



HALT ON ERROR 

THIS SWITCH WHEN SET WILL HALT 
THE PROCESSOR WHEN AN ERROR IS 
DETECTED AFTER THE ERROR MESSAGE 
HAS BEEN TYPED. PRESSING CONTINUE 
WILL RESUME TESTING (SEE SECTION 
3.1 ABOUT LOADING THE SWITCH REG 
BEFORE CONTINUING). 

LOOP ON TEST 

THIS SWITCH WHEN SET WILl 
CAUSE THE PROGRAM TO LOOP ON 
THE CURRENT SUBTEST. 

INHIBIT ERROR TYPEOUTS 

THIS SWITCH WHEN SET WILL 
INHIBIT THE TYPING OF ERROR 
M(:SSAGES. 

INHIBIT TRACE TRAP 

THIS SWITCH WHEN SET WILL 
INHIBIT T-BIT TRAPPING WHICH 
NORMALLY TAKES PLACE DURING 
EVERY OTHER PASS STARTING 
WITH THE THIRD PASS. 

BELL ON ERROR 

THIS SWITCH WHEN SET WILL RING 
THE CONSOLE TERMINAL BELL WHEN 
AN ERROR HAS BEEN DETECTED. 

LOOP ON ERROR 

THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON THE 
FIRST FAILURE WHICH IS ENCOUNTERED 
EVEN IF THE FAILURE IS INTERMITTANT 

LOOP ON TEST IN SWR<7:0> 

THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON THE 
TEST WHOSE TEST NUMBER IS SET 
IN BITS 7-0 OF THE SWITCH REG. 
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217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
251 
252 
253 
254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 
265 



2.4 



2.5 



LOADING THE SWITCH REGISTER 



THE CONSOLE SWITCH REGISTER PROVIDED IS LOADED DIRECTLY FROM 
THE CONSOLE BY TYPING A CONTROL P (*P). THEN WHEN THE CONSOLE 
PROMPT IS RELIEVED. TYPE 'D SW XXXXXX". WHERE "XXXXXX" IS THE 
INTENDED VALUE OF THE SWITCH REGISTER. THE VALUE OF THE 
CONSOLE SWITCH REG. CAN BE CHANGED ANY TIME WHETHER THE PROGRAM 
IS RUNNING OR NOT. 

TO LOAD THE SOFTWARE SWITCH REG. WHILE THE PROGRAM IS 
RUNNING. A CONTROL G (*G) SHOULD BE TYPED ON THE CONSOLE 
TERMINAL. (THE "SCOPE" AND "ERROR" ROUTINES CHECK TO SEE 
IF A *G HAS BEEN TYPED.) THE ORIGINAL VALUE OF THE SOFTWARE 
SWTICH REG. WILL BE REQUESTED AS MENTIONfcD IN SECTION 2.2. 

IN RESPONSE TO A *G OR AT THE BEGINNING OF THE PROGRAM. THE 
PROGRAM WILL TYPE: 



SWR = XXXXXX NEW = 



176. 



<CR> 



THE 



WHERE "XXXXXX" IS THE CURRENT OCTAL CONTENTS OF LOC. 
THE OPERATOR MAY THEN TYPE ANY ONE OF THE FOLLOWING: 
XXXXXX<CR> ONE TO SIX OCTAL DIGITS FOLLOWED BY A 
CARRIAGE RETURN WHICH WILL BE LOADED 
AS THE NEW VALUE FOR THE SWITCH REG. 
JUST A <CR>. LEAVES THE SWITCH REG. 
AS IT IS. 

XXX*U A CONTROL-U (*U) WILL CAUSE ALL OF 
DIGITS TYPED SO FAR TO BE IGNORED. 

*C WILL CAUSE THE PROGRAM TO TYPE THE PRESENT 

TEST AND PASS NUMBERS, REQUEST A NEW VALUE 
FOR THE SWITCH REG.. AND JUMP TO THE END- 
OF-PASS ROUTINE SO THE PROGRAM WILL 60 DIRECTLY 
TO THE NEXT PASS WITH A NEW SW. REG. VALUE 
<ILL.CHAR> ANY CHARACTER TYPED WHICH IS NOT ANY OF THE 

ABOVE OR AN OCTAL DIGIT WILL CAUSE THE PROGRAM 
TO TYPE A "?<CRLF>" AND REACT AS THOUGH A 
*U HAD BEEN TYPED. 

NOTE: RECOGNITION OF A *G MAY BE HAMPERED BY 

EXECUTION OF A COUPLE "RESET" INSTRUCTIONS 

WITHIN THE PROGRAM. 



EXECUTION TIMES 



THE RUN TIME FOR A SINGLE PASS WITH TRACE TRAPPING 
ENABLED IS APPROXIMATELY 5 SECONDS WITH CACHE. 
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266 3.0 ERROR INFORMATION 

267 

269 3.1 ERROR REPORTING PROCEDURES 

270 

271 

272 IF AN ERROR IS DETECTED, THE PROGRAM WILL TRAP TO THE 

273 ERROR HANDLING ROUTINE (SERROR) . THE VALUE OF BITS 

274 15.13,10. AND 9 IN THE SWITCH REGISTER ARE CONSIDERED 

275 IN REPORTING AN ERROR (SEE SECTION 2.3). THE 

276 ERROR INFORMATION WILL BE TYPED UNLESS SW13 = 1. 

278 IF SW15 = 1, THE PROCESSOR WILL HALT AFTER THE ERROR IS 

279 REPORTED. IF THE CONTENTS OF THE SOFTWARE SWITCH REGISTER 

280 ARE TO BE CHANGED. A *G SHOULD BE TYPED BEFORE PRESSING 

281 "CONTINUE" TO RESUME TESTING. 

283 IF SW9 = 1 (LOOP ON ERROR). THE PROGRAM WILL GO TO THE 

284 ADDRESS CONTAINED IN LOCATION "SLPERR". AFTER REPORTING 

285 THE ERROR. "ILPERR" IS SET BY EACH "SCOPE" CALL AND IS 

286 SET DIRECTLY DURING SOME SUBTESTS TO PROVIDE THE SMALLEST 

287 LOOP rOR LOOPING ON ERROR. IF SW9 = 0, THE PROGRAM WILL 

288 RETURN TO THE INSTRUCTION FOLLOWING THE ERROR CALL. 

289 (SEE SECTION 5.3 FOR MORE ON "LOOP ON ERROR"). 
290 

291 3.2 INTERPRETING ERROR REPORTS 

292 

293 

294 EVERY ERROR REPORT TYPES THE NUMBER OF THE TEST IN WHICH 

295 THE ERROR TOOK PLACE (TESTNO) AND THE LOCATION OF THE 

296 ERROR CALL (ERRORPC). THESE TWO VALUES PINPOINT THE 

297 PLACE IN THE CODE THAT THE ERROR OCCURRED. BY REFERRING 

298 TO THE PROGRAM LISTING, THE OPERATOR CAN THEN READ THE 

299 COMMENTS ASSOCIATED WITH THAT PARTICULAR ERROR AND SUBTEST. 
^00 A DESCRIPTION OF THE TEST FOUND IN THE PROGRAM LISTING 

301 WILL ALSO PROVIDE THE OPERATOR WITH INFORMATION ON THE LOGIC 

302 AND FUNCTIONS BEING TESTED. 
303 

304 EVERY ERROR REPORT ALSO TYPES AN ERROR MESSAGE 

305 GIVING A VERBAL DESCRIPTION OF THE ERROR THAT HAS 

306 BEEN DETECTED. 
307 

308 BY USING THE COMMENTS AND TEST DESCRIPTION FOUND IN 

309 THE PROGRAM LISTING TO DETERMINE WHAT FUNCTION OR 

310 LOGIC WAS BEING TESTED. THE OPERATOR CAN THEN REFER 

311 TO THE ENGINEERING DRAWINGS TO ISOLATE THE PROBABLE 

312 CAUSE FOR THE FAILURE. 
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313 3.5 SAMPLE ERROR REPORT 

314 • 

316 BELOW IS AN EXAMPLE OF AN ERROR WHICH COULD HAVE 

317 OCCURRED DURING EXECUTION OF THE PROGRAM: 

319 MEM. MGMT. REG. BITS NOT SET CORRECTLY 

320 RE6ISTR WROTE READ READ-(8INARY) 

321 ADDRESS (OCTAL) (OCTAL) 5432109876543210 TESTNO ERRORPC 

322 177572 040000 060000 0110000000000000 000012 022060 

324 UE SEE THAT THE ERROR OCCURRED IN TEST 12 AT LOCATION 

325 022060. THE "REGISTER ADDRESS" TELLS US THAT WE WERE 

326 TESTING MEMORY MANAGEMENT'S STATUS RGISTER 0 (SRO). 

327 IN THE LISTING. THE TEST DESCRIPTION SAYS THAT THE 

328 ERROR BITS (BITS <15:13» OF SRO WERE BEING SET AND 

329 CLEARED INDIVIDUALLY. THE ERROR REPORT SAYS WE TRIED 

330 TO SET BIT 14 BY WRITING "040000" TO SRO BUT WHEN WE 

331 READ IT BACK WE READ "060000". IT APPEARS THAT BIT 13 IS 

332 STUCK AT "1" OR IT IS GETTING SET WHEN BIT 14 IS SET 

333 TO "1". ERROR REPORTS BEFORE AND AFTER THIS ONE COULD 

334 TELL US WHICH IS THE CASE. 

336 3.4 POWER MONITOR BIT ERRORS 

337 

338 

339 WHEN THE POWER MONITOR BIT (BIT 0 OF THE CPU ERROR REGISTER) BECOMES 

340 SET DURING THE RUNNING OF THIS DIAGNOSTIC, THE SSCOPE ROUTINE WILL 

341 CALL AN ERROR. IF THE BIT SHOULD BECOME SET AFTER THE SSCOPE ROUTINE 

342 AND BEFORE AN ERROR, AND THE ERROR IS CALLED FOR ANY REASON, THE ERROR 

343 ROUTINE WILL CALL *TWO* ERRORS. THE FIRST ERROR WILL BE THE POWER 

344 MONITOR BIT ERROR CALL. THEN THE ERROR CALL ORIGINALLY CALLED WILL BE 

345 PRINTED. IN ANY CASE. LOOP-ON-ERROR IS DISABLED FOR THIS ERROR ONLY. 

346 IT IS RECOWENDED THAT IF THIS ERROR SHOULD BE CALLED. THAT THE PROBLEM 

347 CAUSING THE BIT TO BE SET BE REPAIRED BEFORE RELYING ON THE RESULTS OF 

348 RUNNING THIS DIAGNOSTIC. 
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349 4.0 MISCELLANEOUS INFORMATION 

350 

352 4-1 ACT/APT/XXDP COMPATABILITV 

353 

355 THE PROGRAM IS FULLY ACT AND APT C0MPATA8LE 

356 AND IS SUPPORTED UNDER THE XXDP PACKAGE. 

358 4.2 END-OF-PASS MESSAGE 

359 

360 

361 AT THE END OF EACH PASS OF THE PROGRAM THE PASS NUMBER 

362 AND TOTAL NUMBER OF ERRORS SINCE THE LAST END-OF-PASS ARE 

363 REPORTED IN THE END-OF-PASS MESSAGE. FOR EXAMPLE: 
364 

365 END OF PASS #2 TOTAL ERRORS SINCE LAST REPORT 0 
366 

367 THAT WOULD INDICATE THAT PASS TWO WAS JUST COMPLETED 

368 AND NO ERRORS WERE DETECTED DURING THAT PASS. BOTH 

369 THE PASS NUMBER AND NUMBER OF ERRORS ARE DECIMAL NUMBERS. 
370 

371 4.3 T-BIT TRAPPING 

372 

373 

374 THE "T-BIT" (BIT 4) IN THE PROCESSOR STATUS WORD IS SET 

375 BY AN "RTI" IN THE END-OF-PASS ROUTINE FOR EVERY OTHER PASS 

376 BEGINNING WITH THE THIRD PASS (PASSES 3.5,7.9...). T-BIT 

377 TRAPPING CAN BE INHIBITED BY SETTING BIT 12 = 1 IN THE SWITCH 

378 REGISTER (SEE SECTION 2.4). 
379 

380 4.4 POWER FAILURE HANDLING 

381 

382 

383 IF A POWER FAIL OCCURS (FOLLOWED BY A POWER UP). THE 

384 MESSAGE 'POVER FAILURE-RESTARTING" IS TYPED OUT AND 

385 THE PROGRAM WILL RESTART EXECUTION AT "START:" (THE 

386 VERY BEGINNING OF THE PROGRAM. IF THE SOFTWARE 

387 SWITCH REGISTER IS BEING USED. ITS CONTENTS WILL BE 

388 RESTORED. 
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589 
390 
391 
392 
393 
394 
395 
396 
397 
398 
399 
400 
401 
402 
403 
40A 
405 
A06 
407 
408 
409 
410 
All 
412 
413 
414 
415 
416 
417 
418 
419 



4.5 PHYSICAL BUS ADDRESS CONSTRUCTION 



BELOW IS A SIMPLIFIED DIAGRAM OF HOW THE MEMORY 
MANAGEMENT LOGIC CONSTRUCTS A PHYSICAL BUS ADDRESS 
USING THE VIRTUAL ADDRESS AND THE PAGE ADDRESS REGISTER. 
THE PAGE DESCRIPTOR REGISTER SELECTED WILL CONTAIN THE 
PAGE EXPANSION. LENGTH. AND ACCESS INFORMATION. 



12 11 10 09 08 07 06 05 04 03 02 01 00 
/T'l'T'l 111/111110/ VBA* 











(ADDED TO) 








15 14 13 


12 


11 10 


09 08 


07 06 05 04 03 


02 


01 


00 I 


/ 0 1 0 


1 


0 0 


0 1 


0 10 0 0 


0 


0 


1/ I 


I I 
I I 



PAR** 



21 20 19 18 17 16 15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 

- ----------^ ^ ^ ^ 

*= VBA BITS <15:13> SELECT THE APPROPRIATE PAR AND PDR 
«•= PSU MODE BITS <15:14> SELECTS THE USER (=11). SUPERVISOR 
(=01) OR KERNEL (=00) SET OF PAR'S/PDR'S 



PBA 
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4,20 S.O PROGRAM DESCRIPTION 

421 

423 5.1 SUBROUTINES USED BY THIS PROGRAM 

424 

426 FOLLOWING IS A LIST OF THE SUBROUTINES AND HANDLERS USED 

427 BY THIS PROGRAM THAT ARE NOT PROVIDED BY THE "SYSMAC 

428 PACKAGE". DETAILS OF THE SUBROUTINES UNIQUE TO THIS 

429 PROGRAM MAY BE FOUND IN THE PROGRAM LISTING. REFER TO 

430 THE "SYSMAC" DOCUMENT AND PROGRAM LISTING FOR THE OTHER 

431 ROUTINES. 

433 1. TURN OFF T-BIT AND SAVE CURRENT PSU 

434 2. TURN ON T-BIT AND RESTORE PREVIOUS PSW 

435 3. SET ALL WRITEABLE BITS IN ALL PAR/PDR'S 

436 4. CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 
437 

438 NOTE ALSO THAT THE MACRO LIBRARY USED TO ASSEMBLE THIS PROGRAM 

439 HAS OTHER SPECIAL ROUTINES APPENDED TO THE SYSMAC MACRO PACKAGE; 

440 THIS LIBRARY MUST BE USED TO ASSEMBLE EITHER PART A OR PART B 

441 CORRECTLY. 
442 

443 5.2 PROGRAM LISTING 

444 

445 

446 A TABLE OF CONTENTS APPEARS AT THE BEGINNING OF THE LISTING 

447 WHICH CONTAINS THE NAMES OF EACH SECTION. SUBTEST. AND 

448 ROUTINE AND THE LINE NUMBERS CORRESPONDING TO THE START OF 

449 EACH, 
450 

451 FOLLOWING THIS SECTION OF DOCUMENTATION IS THE ACTUAL 

452 PROGRAM LISTING COMPLETE WITH SUBTEST DESCRIPTIONS AND 

453 "CODING COMMENTS". 
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454 5.3 USING THE PROGRAM TO DIAGNOSE A FAULT 

455 

456 

457 WHEN AN ERROR OCCURS. ONE OF THE THINGS THAT'S IMPORTANT 

458 TO NOTE IS WHAT PASS THE ERROR OCCURRED ON. If THE PASS 

459 NUMBER IS ODD AND IS THREE OR GREATER. THE ERROR MIGHT BE 

460 T-BIT SENSITIVE. TRY RUNNING THE PROGRAM AGAIN WITH BIT 

461 12 OF THE SWITCH REG. EQUAL TO "1" TO INHIBIT T-BIT 

46? TRAPPING. THIS SHOULD HELP YOU DETERMINE WHAT MAKES THE 

463 MACHINE FAIL AND WHEN. 

464 

465 IF YOU HAVE BEEN RUNNING WITH BIT 15 OF THE SWITCH 

466 REG. EQUAL TO "0", THEN YOU ARE ABLE TO LOOK AT ALL 
46^ THE ERRORS THAT MAY BE RELATED TO THE FAULT YOU ARE 

468 DIAGNOSING. A FAULT IN AN EARLIER TEST MAY RESULT IN 

469 ERRORS DURING LATER TESTS WHICH MAY GIVE YOU MORE 

470 CLUES ABOUT THE NATURE OF THE FAULT. NOW USE THE METHOD 

471 OUTLINED IN SECTION 3.2 FOR EACH ERROR TO GATHER AS 

472 Ml"H INFORMATION AS POSSIBLE. 
473 

474 NOW TO TEST YOUR IDEAS ON THE CAUSE OF THE FAILURE. 

475 YOU MAY WANT TO SCOPE THIS ERROR CONDITION. SET BIT 09 

476 OF THE SWITCH REG. EQUAL TO "1" TO LOOP ON THE ERROR. 

477 FOR AN EVEN TIGHTER SCOPE LOOP THE ERROR CALL CAN BE 

478 REPLACED WITH A BRANCH (REFER TO COMMENTS BY ERROR CALLS 

479 IN THE PROGRAM LISTING). 
480 

481 OR YOU COULD LOOP ON THE TEST BY EITHER SETTING BIT U 

482 OF THE SWITCH REG. EQUAL TO "1" OF BY SETTING BIT 08 OF THE 

483 SWITCH REG. EQUAL TO "1" AND THEN SETTING THE TEST NUMBER 

484 IN BITS 07-00 OF THE SWITCH REG. YOU WILL PROBABLY WANT TO 

485 INHIBIT ERROR TYPEOUTS BY SETTING BIT 13 OF THE SWITCH REG. 

486 EQUAL TO "V. 

487 S 
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1194 
1195 



1196 



1197 



001100 
104000 
000004 

000011 
000012 
000015 
000200 
177776 
177776 
■\7777l, 
y77772 
^77'i7<i 
}77570 

000000 
000001 
000002 
000003 
000004 
000005 
000006 
000007 
000006 
000007 

000000 
000040 
000100 
000140 
000200 
000240 
000300 
000340 



TITLE CKKTBDO 11/44 HEM M6MT PRT B 
*C0PyRIGHT (C) 1982 
•DIGITAL EQUIPMENT CORP. 
•MAYNARD. MASS. 01754 



*THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 

•PACKAGE (MAINDEC-11-DZQAC-C5). JAN, 1981. 

* 

S8TTL OPERATIONAL SWITCH SETTINGS 



SWITCH 

'"l5 " 

14 
13 
12 
10 
9 
8 



USE 



HALT ON ERROR 

LOOP ON TEST 

INHIBIT ERROR TYPEOUTS 

INHIBIT TRACE TRAP 

BELL ON ERROR 

LOOP ON ERROR 

LOOP ON TEST IN SWR<7:0> 



SBTTL BASIC DEFINITIONS 
•INITIAL ADDRESS OF THE STACK POINTER 1100 
STACK= 1100 

ERROR=EMT 
SCOPE=IOT 
.••MISCELLANEOUS DEFINITIONS 



HT= 11 
LF= 12 
CR= 15 
CRLF= 200 
PS= 177776 
PSW=PS 
STKL«T= 177774 
PIRQ= ^77772 
DSWR= 177570 
DDISP= 177570 



.••GENERAL PURPOSE REGISTER DEFINITIONS 



R0= 
R1- 
R2- 
R3= 
R4= 
R5= 
R6= 
R7= 
SP= 
PC= 



ZO 
Z1 
Z2 
Z3 
Z4 
Z5 
Z6 
Z7 
Z6 
Z7 



.••PRIORITY LEVEL DEFINITIONS 



PRO= 
PR1 = 
PR2= 
PR3= 
PR4= 
PR5= 
PR6= 
PR 7= 



0 
40 
100 
140 
200 
240 
300 
340 



CODE FOR HORIZONTAL TAB 

CODE FOR LINE FEED 

CODE FOR CARRIAGE RETURN 

CODE FOR CARRIAGE RETURN-LINE FEED 

PROCESSOR STATUS WORD 

STACK LIMIT REGISTER 
PROGRAM INTERRUPT REQUEST REGISTER 
HARDWARE SWITCH REGISTER 
HARDWARE DISPLAY REGISTER 



GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
STACK POINTER 
PROGRAM COUNTER 



PRIORITY LEVEL 0 

PRIORITY LEVEL 1 

PRIORITY LEVEL 2 

PRIORITY LEVEL 3 

PRIORITY LEVEL 4 

PRIORITY LEVEL 5 

PRIORITY LEVEL 6 

PRIORITY LEVEL 7 



CKKT8D0 11/44 MEM MGMT 
BASIC DEFINITIONS 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

000004 
000010 
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C 2 
15-1 



SEQUENCE 



.•••'SWITCH REGISTER 
SUlSr 100000 
SUH- 40000 
SU13= 20000 
SW12= 10000 
SW11= 4000 
SW10= 2000 
SU09= 1000 
SU08= 400 
SW07= 200 
SW06= 100 
SW05= 40 
SU04= 20 
SU03= 10 
SW02= 4 
SU01= 2 
SWOO= 1 

SU9=SW09 

SU8=SW08 

SW7=SW07 

SU6=SU06 

SU5=SU05 

SU4=SU04 

SU3=SU03 

SU2-SU02 

SU1::SU01 
SU0=SU00 

;*DATA BIT DEFINITIONS 

BIT 15= 100000 

BIT14= 40000 

BIT13= 20000 

BJT12= 10000 

BIT11= 4000 

BIT10= 2000 

BIT09= 1000 

BIT08= 400 

BIT07= 200 

8IT06= 100 

BIT05= 40 

BIT04= 20 

BIT03= 10 

BIT02= 4 

BIT01= 2 

BIT00= 1 

BIT9=BIT09 
BIT8=BIT08 
BIT7=8IT07 
BIT6=8IT06 
BIT5=BIT05 
BIT4=8IT04 
BI T3=BI T03 
BIT2=BIT02 
BIT1=BIT01 
BIT0=8IT00 

.♦BASIC "CPU" TRAP 

ERRVEC= 4 

RESVEC= 10 



SWITCH DEFINITIONS 



(BITOO TO BIT15) 



VECTOR ADDRESSES 

;;TIME OUT AND 
:; RESERVED AND 



OTHER ERRORS 
ILLEGAL INSTRUCTIONS 



CKKTBDO 11/44 ME^ MGMT 
BASIC DEFINITIONS 

OOOOK 
OOOOU 
OOOOK 
000020 
000024 
000030 
000034 
000060 
000064 
000240 
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15-2 



SEQUENCE 



1198 



000250 

177572 
177574 
177576 
172516 

1 77600 
1 77602 
177604 
1 77606 
177610 
177612 
177614 
177616 

177620 
177622 
177624 
177626 
177630 
177632 
1 77634 
177636 

177640 
1 77642 
1 77644 
177646 
177650 
177652 
177654 
177656 

177660 
177662 
177664 
177666 
177670 
177672 
177674 
177676 

172200 
172202 



TBITVEC=14 
TRTVEC= 14 
BPTVEC= 
10TVEC= 
PWRVEC= 
EMTVEC= 
TRAPVEC=34 
^KVEC= 60 
TPVEC= 64 
PIRQVEC=240 



14 
20 
24 
30 



MEMORY M^^NAGEMENT 
VECTOR ADDRESS 
250 

STATUS REGISTER ADDRESSES 
177572 
177574 
177576 
172516 
"I" PAGE 
1 77600 
177602 
1 77604 
1 77606 
177610 
177612 
177614 
177616 
"D" PAGE 



.SBTTL 
.••KT11 
MHVEC= 
;*KT11 
SRO= 
SR1 = 
SR2= 
SR3= 
; *USER 
UIPDRO= 
UIPDR1= 
UIPDR2= 
U1PDR3= 
UIPDR4= 
UIPDR5= 
UIPDR6= 
UIPDR7= 
; *USER 
UDPDRO= 
UDPDR1= 
UDPDR2= 
UDPDR3= 
UDPDR4= 
UDPDR5= 
UDPDR6= 
UDPDR7= 
; *USER 
UJPARO= 
UIPAR1= 
UIPAR2= 
UIPAR3= 
UJPAR4= 
UIPAR5= 
UIPAR6= 
UIPAR7= 
.••USER 
UDPARO= 
UDPAR1= 
UDPAR2= 
UDPAR3= 
UDPAR4= 
UDPAR5= 
UDPAR6= 
UDPAR7= 

.♦SUPERVISOR "I* 
SIPDRO= 172200 
SIPDR1= 172202 



"T" BIT 
TRACE TRAP 

BREAKPOINT TRAP (BPT) 
INPUT/OUTPUT TRAP (lOT) ••SCOPE** 
POWER FAIL 

EMULATOR TRAP (EMT) ••ERROR*^ 
' 'TRAP' ' TRAP 
TTY KEYBOARD VECTOR 
TTY PRINTER VECTOR 
PROGRAM INTERRUPT REQUEST VECTOR 
DEFINITIONS 



DESCRIPTOR REGISTERS 



177620 
177622 
177624 
177626 
177630 
177632 
177634 
177636 
i" PAGE 
177640 
177642 
177644 
177646 
177650 
177652 
177654 
177656 
•D" PAGE 
177660 
177662 
1 77664 
1 77666 
177670 
177672 
177674 
1 77676 



DESCRIPTOR REGISTORS 



ADDRESS REGISTERS 



ADDRESS REGISTERS 



PAGE DESCRIPTOR REGISTERS 



CKKTBDO ME1 MGMT PRT B 

MEMORY MANAGEMENT DEFINITIONS 

172206 
172210 
172212 

}72220 
m222 
}7222t. 
m22t 
y722lQ 
y722l2 

m2if* 

y722lt 

1722A0 
y722U2 
y722t*U 
y722t*t 
172250 
172252 
17225A 
172256 

1 72260 
172262 
172264 
1 72266 
172270 
^72272 
^72271, 
\7227b 

172300 
172302 
1 72304 
172306 
172310 
172312 
1723U 
172316 

172320 
172322 
172324 
172326 
172330 
172332 
172334 
172336 

172340 
172342 
172344 
1 72346 
172350 
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E 2 
15-3 



SEQUENCE 



SIPDR2= 172204 
SIPDR3= 172206 
SIPDR4= 172210 
SI0DR5= 172212 
SIPDR6= 172214 
SIPDR7= 172216 

.•♦SUPERVISOR "D" PAGE DESCRIPTOR REGISTERS 

SDPDRO= 172220 

SDPDR1= \72222 

SDPDR2= 172224 

SDPDR3= 172226 

SDPDR4= 172230 

SDPDR5= 172232 

SDPDR6= 172234 

SDPDR7= 172236 

.••SUPERVISOR "I" PAGE ADDRESS REGISTERS 

SIPARO= 172240 

SIPAR1= 172242 

SIPAR2= 172244 

SIPAR3= 172246 

SIPAfi4= 172250 

SIPAR5= 172252 

SIPAR6= 172254 

SIPAR7= 172256 

.•♦SUPERVISOR "D" PAGE ADDRESS REGISTERS 

SDPARO= 172260 

SDPAR1= 172262 

SDPAR2= 172264 

SDPAR3= 172266 

SDPAR4= 172270 

SDPAR5= y72272 

SDPAR6= 172274 

SDPAR7= 172276 

.-•KERNEL "I" PAGE DESCRIPTOR REGISTERS 

KIPDRO= 172300 

KIPDR1= 172302 

KIPDR2= 172304 

KIPDR3= 172306 

KIPDR4= 172310 

KIPDR5= 172312 

KIPDR6= 172314 

KIPDR7= 172316 

;*KERNEL "D" PAGE DESCRIPTOR REGISTERS 

KDPDRO= 172320 

KDPDR1= 172322 

KDPDR2= 172324 

KDPDR3= 172326 

KDPDR4= 172330 

KDPDR5= 172332 

KDPDR6= 172334 

KDPDR7= 172336 

.••KERNEL "I" PAGE ADDRESS REGISTERS 

KIPARO= 172340 

KIPAR1= 172342 

KIPA92= 172344 

KIPAR3= 172346 

KIPAR4= 172350 



UltTBOO 11/^4 ME>1 
MEMORY MANAGEMENT 



MGMT PRT B 
DEFINITIONS 
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SEQUENCE 18 



1199 
1200 
1201 
1202 
1203 
1204 
1205 
1206 
1207 
1208 
1209 
1210 
1211 
1212 
1213 
1214 



172352 
172354 
172356 

172360 
172362 
172364 
172366 
172370 
172372 
172374 
1 72376 



177572 
177574 
177576 
172516 
000006 
000006 
000006 
000020 
000100 
177766 
001100 
000700 
000600 



K1PAR5= 172352 
K1PAR6= 172354 
KIPAR7= 172356 

;*<ERNEL "D" PAGE ADDRESS REGISTERS 
<DPAR0= 172360 
172362 
172364 
172366 
172370 
172372 
172374 
172376 

DEFINITIONS 



KDPAR1= 
KDPAR2= 
KDPAR3= 
KDPAR4= 
K0PAR5= 
KDPAR6= 
KDPAR7= 
.••ADDITIONAL 
• * 

MMR0=SR0 
M«R1=SR1 
M«R2=SR2 
MMR3=SR3 
KSP=SP 
SSP=SP 
USP=SP 
TBIT=8IT4 
UBIT=BIT6 
CPUERR=1 77766 
KERSTK=STACIC 
SUPSTK=STACK-200 
USESTK=STACK-300 



CKKTBOO 11/44 HE« MG«T PRT B 
TRAP CATCHER 
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1246 



000174 
000176 



000000 



0001 74 
000000 
000000 



000200 000137 020000 



.SBTTL TRAP CATCHER 

.-•ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A '•.*2,HALT" 
•SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
••LOCATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 

=174 

.SBTTL SURTING «5J£SS(eS)^ ^^^^^^ ^^^^^^ ^ 



SEQUENCE 19 



H 2 

CtClcTBDO 11 /4A MEH MGMT PRT B MACRO Mil 13 12-JAN-82 12:19 PAGE 18 SEOUEWCE 

ACT11 HOOKS 

12A7 .S8TTL ACTII HOOKS 

•HOOKS REQUIRED BY ACT11 
00020A $SVPC=. .-SAVE PC 

000046 036252 $ENDAD ;;1)SET L0C.46 TO ADDRESS OF $ENOAD IN .$EOP 

000052 000000 iuORD 0 ' •^ilVfcl^i'^ hl^ '° "''^ 

000204 .=$SVPC ;; RESTORE PC 



CKKTBDO 11/44 
APT PARAMETER 

1248 



MEM MGMT 
BLOCK 



PRT B MACRO Ml 11 3 



I 2 

12-JAN-82 12:19 PAGE 19 



SEQUENCE ^1 



000204 

000024 
000024 000200 

000044 
000044 000204 

000204 



000204 
000204 
000206 
000210 
000212 
000214 
000216 



000000 
001224 
000002 
000005 
000005 
000014 



SBTTL APT PARAMETER BLOCK 



SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 

**************************************************************** 



.$X=. 

.=24 
200 
.=44 
SAPTHDR 
. = .$X 



SAVE CURRENT LOCATION 

SET POWER FAIL TO POINT TO START OF PROGRAM 
FOR APT START UP 

POINT TO APT INDIRECT ADDRESS PNTR. 
POINT TO APT HEADER BLOCK 
RESET LOCATION COUNTER 



SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDPI 1 DIAGNOSTIC 

INTERFACE SPEC. 



$APTHD 

SHIBTS 

SMBADR 

$TSTM: 

SPASTM: 

SUNITM: 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



0 

$MAIL 

2 
5 
5 



TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
ADDRESS OF APT MAILBOX (BITS 0-15) 
RUN TIM OF LONGEST TEST 

RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL 



$ETEND-$MAIL/2 .-.-LENGTH MAI L80X-E TABLE (WORDS) 



UNIT 



CKKTBDO 11 /AA 
COMMON TAGS 

1249 
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001100 
001100 
001102 
001103 
0011 OA 
001106 
001110 
001112 
00111A 
001 1 1 5 
001116 
001120 
001122 
001 12A 
001126 
001 1 30 
001132 
001 13A 
001135 
001136 
0011 AO 
001 1A2 
001 1AA 
001 1A6 
001150 
001152 
001 15A 
001155 
001156 
001157 
001160 



001162 
001 16A 
001166 
001170 
001172 
001 17A 

001176 
001200 
001202 
001 20A 
001206 
001210 
001212 
0012K 
001217 
001220 
001221 
001222 



001100 

000000 
000 
000 
000000 
000000 
000000 
000000 
000 
001 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000 
000 
000000 
177570 
177570 
177560 
177562 
17756A 
177566 
000 
002 
012 
000 
000000 

000006 
000000 
000000 
000000 
000000 
000000 
000000 
000006 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
207 
000 
077 
015 
012 



.SBTTL 
• • ***** 

•iTHIS 
.-•USED 

$CMTAG: 



COMMON TAGS 
*********************••*< 

TABLE CONTAINS VARIOUS C( 
IN THE PROGRAM. 
.=1100 





.WORD 


0 


STSTNM 


• .BYTE 


0 


SERFLG 


.BYTE 


0 


SICNT: 


.WORD 


0 


SLPADR 


.WORD 


0 


SLPERR 


.WORD 


0 


SERTTL 


.UORD 


0 


SITEMB 


.BYTE 


0 


SERMAX 


.BYTE 


1 


SERRPC 


.WORD 


0 


SGDADR 


.WORD 


0 


$BDADR 


.WORD 


0 


SGDDAT 


.UORD 


0 


SBDDAT 


.UORD 


0 




.WORD 


0 




.UORD 


0 


SAUTOB 


.BYTE 


0 


SINTAG 


.BYTE 


0 




.WORD 


0 


SUR: 


.UORD 


DSUR 


DISPLAY: .WORD 


DDISP 



$TKS: 

$TKB: 

$TPS: 

$TPB: 

SNULL : 

SFILLS 

SFILLC 

STPFLG 

SREGAD 



$REGO 
SREGI 
$REG2 
$RE63 
SREGA 
$REG5 
.REPT 
STMPO 
$TMP1 
$TMP2 
$TMP3 
STMPA 
$TMP5 



177560 
177562 
17756A 
177566 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.UORD 

.REPT 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 
6 

.UORD 
.UORD 
.WORD 
.UORD 
.UORD 
.UORD 



0 
2 

12 

0 

0 

$CM3 

0 
0 
0 
0 
0 
0 

0 
0 
0 

0 
0 
0 



377 



000 



$ESCAPE:0 

377 $BELL: .ASCIZ <207><377><377> 

SQUES: .ASCII /?/ 

SCRLF: .ASCII <15> 

$LF: .ASCIZ <12> 



STORAGE LOCATIONS 



START OF COMMON TAGS 

CONTAINS THE TEST NUMBER 
CONTAINS ERROR FLAG 
CONTAINS SUBTEST ITERATION COUNT 
CONTAINS SCOPE LOOP ADDRESS 
CONTAINS SCOPE RETURN FOR ERRORS 
CONTAINS TOTAL ERRORS DETECTED 
CONTAINS ITEM CONTROL BYTE 
CONTAINS MAX. ERRORS PER TEST 
CONTAINS PC OF LAST ERROR INSTRUCTION 
CONTAINS ADDRESS OF 'GOOD' DATA 
CONTAINS ADDRESS OF 'BAD' DATA 
CONTAINS 'GOOD' DATA 
CONTAINS 'BAD' DATA 
RESERVED— NOT TO BE USED 

AUTOMATIC MODE INDICATOR 
INTERRUPT MODE INDICATOR 

ADDRESS OF SUITCH REGISTER 
ADDRESS OF DISPLAY REGISTER 
TTY KBD STATUS 
TTY KBD BUFFER 

TTY PRINTER STATUS REG. ADDRESS 
TTY PRINTER BUFFER REG. ADDRESS 
CONTAINS NULL CHARACTER FOR FILLS 
CONTAINS * OF FILLER CHARACTERS REQUIRED 
INSERT FILL CHARS. AFTER A "LINE FEED" 
"TERMINAL AVAILABLE" FLAG (BIT<07>=0=YES) 
CONTAINS THE ADDRESS FROM 
UHICH ($REGO) WAS OBTAINED 

CONTAINS ( (SREGAD) +0) 

CONTAINS ((SREGAD) +2) 

CONTAINS ((SREGAD) ♦A) 

CONTAINS ((SREGAD) +6) 

CONTAINS ((SREGAD) +10) 

CONTAINS ((SREGAD) ^12) 

USER DEFINED 

USER DEFINED 

USER DEFINED 

USER DEFINED 

USER DEFINED 

USER DEFINED 

ESCAPE ON ERROR ADDRESS 

CODE FOR BELL 

QUESTION MARK 
CARRIAGE RETURN 
LINE FEED 



CKKTBOO 11 /%4 MEM MGMT PRT B 
COMnON TAGS 
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SEQUENCE 



001224 
001224 
001226 
001230 
001232 
001234 
001 236 
001240 
001242 
001244 
001244 
001245 
001246 
001250 
001252 



001254 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 
000 
000000 
000000 
000000 



• • ***** 

'.S8TTL 
• • ***** 

'.EVEN 
SMAJL: 
SMSGTY: 
SFATAL : 
STESTN: 
SPASS : 
SDEVCT: 
$UNI T ; 
SMS6AD: 
SMSGLG: 
$E TABLE; 
$ENV: 
$ENVM: 
SSUREG: 
SUSUR: 
SCPUOP: 

* 

* 

* 

* 

* 

* 

SETEND: 
.MEXIT 



********************************************************** 

APT MAI LBOX-E TABLE 
********************************************************** 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

.BYTE 
.BYTE 
.WORD 
.WORD 
.UORD 



AMSGTY 
AFATAL 
ATESTN 
APASS 

ADEVCT 
AUNIT 
AMSGAD 
AMS6LG 

AENV 

AENVM 

ASUREG 

AUSUR 

ACPUOP 



001254 


000000 




TESTNO 


.WORD 


0 


001256 


000000 




UASR6: 


.WORD 


0 


001260 


000000 




TRAPPC 


.WORD 


0 


001262 


000000 




TRAPPS 


.UORD 


0 


001264 


000000 




UASSRO 


.UORD 


0 


001266 


000000 




UASSR1 


.UORD 


0 


001270 


000000 




UASSR2 


.UORD 


0 


001272 


000000 




UASSR3 


.UORD 


0 


001274 


000000 




TBI TPS 


.UORD 


0 


001276 


000000 




VIRT1: 


.WORD 


0 


001300 


000000 




PBALO: 


.UORD 


0 


001302 


000000 




PBAHI : 


.UORD 


0 


001304 


000000 




BADPC; 


.UORD 


0 


001306 


000200 




SMXCNT 


.UORD 


200 


001310 


000000 




STBIT: 


.UORD 


0 


001312 


136 


103 


015 SCNTLC 


• .ASCIZ 


001315 


012 


000 




.EVEN 





APT MAILBOX 
MESSAGE TYPE CODE 
FATAL ERROR NUMBER 
TEST NUMBER 
PASS COUNT 
DEVICE COUNT 
I/O UNIT NUMBER 
MESSAGE ADDRESS 
MESSAGE LENGTH 
APT ENVIRONMENT TABLE 
ENVIRONMENT BYTE 
ENVIRONMENT MODE BITS 
APT SUITCH REGISTER 
USER SUITCHES 
CPU TYPE. OPTIONS 
BITS 15-11=CPU TYPE 

1 1 /04=01 , 1 1/05=02 . 1 1 /20=03 J 1 /40=04 . 1 1 /45=05 
11/70=06,PDO=07,Q=10 
BIT 10=REAL TIME CLOCK 
BIT 9=FL0ATING POINT PROCESSOR 
BIT 8=MEM0RY MANAGEMENT 



TRAP OR ABORT 
SRO 



HOLDS TEST NUMBER FOR TYPEOUTS 
USED TO STORE THE STACK POINTER AFTER A TRAP 
USED TO STORE THE PC OF A TRAP OR ABORT 
USED TO STORE THE PS OF A 
USED TO STORE CONTENTS OF 
USED TO STORE COf.rENTS OF SRI 
USED TO STORE CONTENTS OF SR2 
USED TO STORE CONTENTS OF SR3 
SAVES THE PSU THAT MAY HAVE ITS T-BIT ON 
HOLDS VIRTUAL ADDRESS TO BE CONVERTED 
HOLDS BITS <15:00> OF PHYSICAL ADDRESS 
HOLDS BITS <21:16> OF PHYSICAL ADDRESS 
HOLDS PC FROM ABORT OR TRAP 
HOLD MAX. NUMBER OF LOOP ITERATrNS 
'T* BIT STATE INDICATOR 
CONTROL C 



CKKTBDO 11 /A4 MEM MGMT PRT B 
ERROP POINTER TABLE 
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L 

21 



SEQUENC; 



2U 



1250 

1251 

1252 

1253 

125A 

1255 

1256 

1257 

1258 

1259 

1260 

1261 

1262 

1263 

126A 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 

1273 

1274 

1275 

1276 

1277 

1278 

1279 

1280 

1281 

1282 

1283 

1284 

1285 

1286 

1287 

1288 

1289 

1290 



001320 

001320 
001322 
001324 
001326 



001330 
001332 
001 334 
001336 



001340 
001342 
001344 
001346 



001350 
001352 
001354 
001356 



001360 
001362 
001364 
001366 



001370 
001372 
001374 
001376 



OOHOO 
001402 
001404 
001406 



007522 
012672 
015306 
016057 



007562 
012752 
015324 
016041 



007631 
013042 
015344 
016050 



007701 
013042 
015344 
016050 



007750 
013102 
015356 
016057 



010022 
013162 
015374 
016057 



010073 
013242 
015412 
016057 



S8TTL ERROR POINTER TABLE , „ 

•THIS TABLE CONTAINS THE INFORMATION FOR EACH ERP^R THAT CAN OCCUR, 
*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
'LOCATION SITEHB. THIS NUMBER INDICATES WHICH ITE^' IN THE TABLE IS PERTINENT. 



*N0TE1 
•N0TE2; 



$ERRT8: 
;*ITEM 



EM 
DH 
DT 
DF 



1 



EMI 
DHI 
DTI 
DF12 



;*ITEM 2 



EM2 

Dh2 
DT2 
DF2 



.••ITEM 3 



EM10 
DH10 
DT10 
DF3 



.••ITEM 4 



EM11 
DHIO 
DT10 
DF3 



;*ITEM 5 



EM12 
DH12 
DT12 
DF12 



.••ITEM 6 



EM13 
DHI 3 
DT13 
DF12 



.••ITEM 7 



EMU 
DH14 
DT14 
DF12 



IF SITEHB IS 0 THE ONLY PERTINENT DATA IS (SERRPC). 
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS fOLLC^WS: 
POINTS TO THE ERROR MESSAGE 
POINTS TO THE DATA HEADER 
POINTS TO THE DATA 
POINTS TO THE DATA FORMAT 



UNEXPECTED CPU TRAP TO LOC. 004 

OLD PC OLD PSW R6 WAS CPUERR TESTNO ERRORPC 

TRAPPC , TRAPPS . WASR6 . CPUERR . TE S TNO . SERPPC ,0 

0.0,0,0.0,0 

UNEXPECTED MEM. MGMT. TRAP TO LOC. 250 
OLD PC OLD PSW R6 WAS SRO SR2 TESTNO ERRORPC^ 
TRAPPC, TRAPPS, WASR6, WASSRO. WASSR2, TESTNO, SERRPC, 0 



0,0,0,0,0,0,0 



.•MEMORY MGMT. ACCESS ABORT DID NOT OCCUR 
;PDR 4 PSW TESTNO ERRORPC 
;$REG2,$TMP0, TESTNO, SERRPC, 0 
;0,0,0,0 



ACCESS ERROR DID NOT ABORT INSTRUCTION 
PDR 4 PSW TESTNO ERRORPC 
SRE62,$TMP0, TESTNO, SERRPC, 0 
0,0,0,0 



SRO DID NOT REPORT ACCESS ERROR CORRECTLY 
SRO WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 
WASSRO, $R£G3,SREG2,STMP0, TESTNO, SERRPC, 0 
0,0,0.0,0.0 

SR2 DID NOT LOCKUP CORRECT VIRTUAL ADDR. 
SR2 WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 
WASSR2-SREG4,SREG2,STMP0, TESTNO, SERRPC, 0 
0,0,0,6,0,0 

PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE 
V.8.A. KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC 
SREG0.SREG4.WASSR0,WASSR2, TESTNO, SERRPC, 0 
0.0,0.0,0,0 



CKICTBDO 11/44 MEM HGMT 
ERROR POINTER TABLE 



PRT 8 (1ACR0 H1 113 12-JAN-82 



1291 
1292 
1293 
1294 
1295 
1296 
1297 
1298 
1299 
1300 
1301 
1302 
1303 
1304 
1305 
1306 
1307 
1308 
1309 
1310 
1311 
1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1328 
1329 
1330 
1331 
1332 
1333 
1334 
1335 
1336 
1337 
1338 



001410 
001412 
001414 
001416 



001420 
001422 
001424 
001426 



001430 
001432 
001434 
001436 



001440 
001442 
001444 
001446 



001450 
001452 

001454 
001456 



001460 
001462 
001464 
001466 



001470 
001472 
001474 
001476 



001500 
001502 
001504 
001506 



010154 
013322 
015430 
016050 



010237 
013362 
015442 
016057 



010022 
013442 
015460 
016057 



010022 
013522 
015476 
016050 



010315 
013562 

015510 
016057 



010362 
013677 
015526 
016050 



010431 
013522 
015476 
016050 



010464 
013737 
015540 
016050 



;*ITEH 10 

EH15 
DH15 
DT15 
0F3 

.-•ITEM 11 

EMI 6 
Dh16 
DT16 
DF12 

.••ITEM 12 

EMI 3 
DH17 
DT17 
DF12 

;*ITEM 13 

EM13 
DH20 
DT20 
0F3 

;*ITEM 14 

EM21 
0H21 

DT21 
DF12 

;*ITEM 15 

EM22 
DH22 
DT22 
DF3 

;*ITEM 16 

EM23 
0H20 
DT20 
DF3 

;*ITEM 17 

EM24 
DH24 
DT24 
DF3 



M 2 
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SEOUEf^CE 25 



.-PAGE LGTH. ABORT DID NOT OCCUR WHEN IT SHOULD HAVE 
;V.8.A. KIPDR4 TESTNO ERRORPC 
;$REG0,$REG4,TESTN0,$ERRPC.0 
;0. 0,0,0 



SRO DID NOT REPORT PAGE LGTH. ABORT CORRECTLY 
V.B.A. KIP0R4 SRO WAS EXPECTD TESTNO ERRORPC 
$REG0,SREG4,WASSR0,$REG2, TESTNO, $ERRPC,0 
0.0,0,0.0,0 



SR2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 

V.B.A. KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC 

$REG0,$REG4,WASSR2,$REG3,TESTNO,$ERRPC,0 

0.0.0.0,0,0 



SR2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 
SR2 WAS EXPECTD TESTNO ERRORPC 
WASSR2,$REG1 , TESTNO, SERRPCO 
0,0,0,0 



SRO OR SR2 CHANGED BY A SECOND ABORT 
FIRST ABORT SECOND ABORT 

SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC 
$TMP0,$TMP2,WASSR0,WASSR2, TESTNO, SERRPC.O 
0.0,0,0,0,0 



;SRO OR SR2 WAS NOT "RESET" BY A RESET 
;SRO WAS SR2 WAS TESTNO ERRORPC 
; WASSRO . WASSR2 . TE STNO , SERRPC . 0 
;0, 0,0,0 



SR2 NOT TRACKING CORRECTLY 
SR2 WAS EXPECTD TESTNO ERROPC 
WASSR2,$REG1 , TESTNO.SERRPC .0 
0.0,0,0 



DID NOT TRAP THRU KERNEL SPACE 
PSW WAS R6 WAS TESTNO ERRORPC 
$REG1.$fiEG2, TESTNO, SERRPC, 0 
0,0,0,0 



CUMBDO 11 /AA 
ERROR POINTER 



MEM NGMT 
TABLE 



PRT 8 MACRO H1 113 12-JAN-82 



1339 

1340 

13A1 

13A2 

1343 

13AA 

1345 

1346 

1347 

1348 

1349 

1350 

1351 

1352 

1353 

1354 

1355 

1356 

1357 

1358 

1359 

1360 

1361 

1362 

1363 

1364 

1365 

1366 

1367 

1368 

1369 

1370 

1371 

1372 

1373 

1374 

1375 

1376 

1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 

1385 

1386 

1387 

1388 

1389 

1390 

1391 

1392 

1393 

1394 

1395 



001510 
001512 
001514 
001516 



001520 
001522 

001524 
001526 



001530 
001532 



001534 
001536 



001540 
001542 

001544 
001546 



001550 
001552 

001554 
001556 



001560 
001 562 
001564 
001566 



001570 
001572 
001574 
001576 



001600 
001602 
001604 
001606 



010523 
013522 
015476 
016054 



010570 
013777 

015552 
016057 



010636 
014111 



015570 
016057 



010713 
014306 

015606 
016050 



010756 
014306 

015606 
016050 



011021 
014362 
015620 
016065 



011057 
014401 
015526 
016050 



011135 
014441 
015626 
016034 



001610 011216 



.-•ITEM 20 

EM25 

DH20 
DT20 
DF5 

;*ITEH 21 

EM26 
DH26 

DT26 
DF12 

;*ITEM 22 

EM27 
DH27 



DT27 
DF12 

;*ITE« 23 

EM30 
DH30 

DT30 
DF3 

;MTEf1 24 

EM31 
DH30 

DT30 
DF3 

;*ITEM 25 

EM32 
DH32 
DT32 
DF32 

;*ITEH 26 

EM33 
DH33 
DT22 
DF3 

;*ITEM 27 

EM34 
DH34 
DT34 
DF1 

.-•ITEM 30 

EM35 
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SEQUENCE 26 



KT ERROR SERVICED ON ODD ADDR. ERROR 
PDR TESTNO ERRORPC 
$REG5,TESTNO,$ERRPC.O 
0.0,0 



;SR0 OR SR2 CHANGED BY ODD ADDR. ERROR 
.•EXPECTED RECEIVED 

;SRO SR2 SRO WAS SR2 WAS TESTNO ERRORPC 
;$RE60.$RE61.WASSR0.WASSR2, TESTNO. SERRPC.O 
.•0,0.0.0. 0,0 



.•ERROR DURING "DOUBLE ERROR" (KT & ODD ADDR.) 
.•EXPECTED: 

;PSW PC SRO SR2 

; 17001 7 (3$+4) 020147 (3J) 
.•RECEIVED 

;PSW PC SRO SR2 TESTNO ERRORPC 

; $RE 6 1 . SRE 63 . WASSRO . WASSR2 , TE STNO , $E RRPC , 0 
;0. 0,0. 0,0.0 



;MFPI INSTRUCTION PUSHED WRONG DATA 
;DATA DATA 

;EXPECTD RECEIVD TESTNO ERRORPC 
;$REG0,$REG1 .TESTNO, fERRPCO 
;0, 0,0.0 



;MTPI INSTRUCTION LOADED WRONG DATA 
.-DATA DATA 

.•EXPECTD RECEIVD TESTNO ERRORPC 
;$REG0,$REG1, TESTNO, $ERRPC,0 
;0. 0,0.0 



; STACK NOT PUSHED BY MFPI-MTPI 
.TESTNO ERRORPC 
; TESTNO, SERRPCO 
;0,0 



.•KERNEL PAGE ACCESSED INSTEAD OF USER: HFPI-MTPI 
;SR0 WAS SR2 WAS TESTNO ERRORPC 
;WASSR0.WASSR2. TESTNO. JERRPC.O 
.•0,0,0,6 



;M.M. ABORT IN KERNAL D-SPACE HAD WRONG CONDITION 
;(«MRO) (WRD (MMR2) TESTNO ERRORPC EXPECTING 020031 
;$REG1.$RE62.$REG3, TESTNO. SERRPCO 
.0.0.0.0,0 



.•ILLEGAL MODE 10 NOT ABORTED 



CKKTBDO '1/44, 
ERROR POINTER 



HEH MGMT 
TABLE 



PRT B HACRO nni3 12-JAN-82 12:19 PAGE 



B 3 

23-1 



1396 001612 0U362 

1397 0016U 01562U 

1398 001616 016065 



DH32 
DT32 
OF 32 



SfOUfNCE 



TESTNO ERRORPC 
TESTNO.SERRPCO 
0.0 



CtCKTBDO 11/44 MEM MGHT 
ERROR POINTER TABLE 



PRT B MACRO Ml 113 12-JAN-82 



1399 

UOO 

U01 

U02 

U03 

HOA 

K05 

1406 

1407 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 

HIS 

1419 

1420 

1421 

1422 

1423 

1424 

1425 

1426 

1427 

1428 

1429 

1430 

1431 

1432 

1433 

1434 

1435 

1436 

1437 

1438 

1439 

1440 

1441 

1442 

1443 

1444 

1445 

1446 

1447 

1448 

1449 

1450 

1451 

1452 

1453 



001620 
001622 
001624 
001626 



001630 
001632 
001634 
001636 



001640 
001642 
001644 
001646 



001650 
001652 

001654 
001656 



001660 
001662 
001664 
001666 



001670 
001672 
001674 
001676 



001700 
001702 

001704 
001 706 



001710 
001712 
001714 
001716 



001720 
001722 
001724 
001726 



011252 
014532 
015642 
016050 



011327 
014572 
015540 
016050 



011372 
014632 
015654 
016054 



011457 
014703 

01 5664 
016034 



011523 
015007 
015700 
016050 



011566 
015047 
015712 
016034 



011633 
014306 

015606 
016050 



011566 
015047 
015726 
016034 



011701 
014362 
015620 
016041 



;*ITEM 31 

EM36 
DH36 
DT36 
DF3 

.••ITEM 32 

EM3? 
DH37 
DT24 
DF3 

.••ITEM 33 

EM40 
DH40 
DT40 
DF5 

.••ITEM 34 

EM41 
DH41 

DT41 
DFl 

.••ITEM 35 

EM42 
DH42 
DT42 
DF3 

.••ITEM 36 

EM43 
DH43 
DT43 
DFl 

;*ITEM 37 

EMA4 
0H30 

DT30 
DF3 

.-•ITEM 40 

EM43 
DH43 
DT45 
DFl 

.••ITEM 41 

EM45 
DH32 
0T32 
DF2 
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SEQUENCE 28 



SRO DID NOT REPORT ILLEGAL MODE 10 CORRECTLY 
SRO WAS EXPECTD TESTNO ERRORPC 
yASSR0.$REG1.TESTNO.$ERRPC.0 
0.0,0.6 



PSU CHANGED BY AN RTI IN USER MODE 
PSU WAS EXPECTD TESTNO ERRORPC 
$RE61 .SRE62. TESTNO. SERRPC .0 
0,0.0.0 



ABORT IN KERNAL D-SPACE PICKED UP VECTOR FROM I-SPACE 
(PSW) TESTNO ERRORPC EXPECTING XXX340 
SREGO. TESTNO, SERRPCO 
0,0,0 



D SPACE ENABLE CIRCUITRY HAS FAILED 
ERROR AUTOI/D VIRTUAL 

REGISTR REGISTR ADDRESS TESTNO PC AT ABORT 

WASSR0,WASSR1.UASSR2,TESTN0.8ADPC,0 

0,0,0,0,0 



INCORRECT STORE BY MTP INSTRUCTION 
GDDATA STORED TESTNO ERRORPC 
$RE G3 , $RE64 , TE STNO . SERRPC , 0 
0,0,0.0 



.•TRIED TO REFERENCE NON-RESIDENT PAGE 
;(WRO) (HMR1) (MMR2) TESTNO ERRORPC 
;$RE60,$REG1,$REG2, TESTNO, SERRPC.O 



.•WRONG DATA FETCHED BY MFP INSTRUCTION 
.DATA DATA 

.•EXPECTD RECEIVD TESTNO ERRORPC 
;$REG0.$REG1. TESTNO, SERRPCO 
;0.0,0.0 



.•TRIED TO REFERENCE NON-RESIDENT PAGE 
;(MMRO) (MMR1) (MMR2) TESTNO ERRORPC 
. WASSRO.WASSRI .WASSR2, TESTNO, SERRPCO 
;0, 0,0. 6,0 



.•ILLEGAL CSM DID NOT TRAP TO 10 
.TESTNO ERRORPC 
;TESTN0,$ERRPC.0 
;0,0 



D 3 



CKKTBDO n/44 
ERROR POINTER 



USA 

K55 

U56 

1A57 

U58 

U59 

1460 

1461 

1462 

1463 

1464 

1465 

1466 

1467 

1468 

1469 

1470 

1471 

1472 

1473 

1474 

1475 

1476 

1477 

1478 

1479 

1480 

1481 

1482 

1483 

1484 

1485 

1486 

1487 

1488 

1489 

1490 

1491 

1492 

1493 

1494 

1495 

1496 

1497 

1498 

1499 

1500 

1501 

1502 

1503 

1504 

1505 

1506 

1507 

1508 

1509 



001730 
001732 
001 734 
001736 



001740 
001742 
001744 
001 746 



001 750 
001752 

001754 
001756 



001760 
001 762 

001764 
001766 



001770 
001772 

001 774 
001 776 



002000 
002002 
002004 
002006 



002010 
002012 
002014 
002016 



002020 
002022 
002024 
002026 



002030 
002032 
002034 
002036 



MEH NGHT PRT B »MCRO mi13 12-JAN-82 12:19 PAGE 25 
TABLE 

;*ITE« 42 

011740 EH46 

015117 DH44 

015742 DT46 

016034 DFl 

.-•ITEM 43 

012002 E«47 

015117 DH44 

015742 DT46 

016034 DFl 

.-•ITEM 44 

012041 EM50 

014306 DH30 

015606 DT30 

016034 DFl 

;*ITEH A5 

012070 EM51 

014306 DH^O 

015754 DT47 

016034 DFl 

;MTEM 46 

012126 EM52 

0U306 DH30 

015766 DT50 

016034 DFl 

;*]TEM 47 

012152 EM53 

015117 DH44 

016000 DT52 

016050 DF3 

;*ITE« 50 

012217 EM54 

014362 DH32 

015620 DT32 

016054 DF5 

;*ITE.1 51 

012263 EM55 

014362 DH32 

015620 DT32 

016054 DF5 

;*ITE(i 52 

012327 EM56 

015207 DH55 

016010 DT55 
016050 DF3 



SEQUENCE 2^ 



;:SM DID NOT ENTER SUPERVISOR MODE 
;EXPECTD (PSW) TESTNO ERR PC 
;$RE63,ACSMPS,TESTNO,fERRPC.0 
;0, 0.0, 0,0 



CSM SET UP WRONG PREVIOUS MODE 
EXPECTD (PSy) TESTNO ERR PC 
$RE63.ACSMPS. TESTNO. SERRPCO 
0.0.0.0.0 



CSM SET UP STACK WRONG 
DATA DATA 

FXPECTD RECEIVD TESTNO ERR PC 
ACSMSP.STMPO. TESTNO. SERRPC.O 
0.0.0.0.0 



CSM PUSHED INCORRECT ARGUMENT 
DATA OATA 

EXPECTD RECEIVD TESTNO ERR PC 
SREGO.CSMl ST, TESTNO. SERRPC.O 
0.0.0.0.0 



CSM PUSHED WRONG PC 
DATA DATA 

EXPECTD RECEIVD TESTNO ERR PC 
STMPO . CSM2ND . TESTNO.SERRPC.O 
0.0.0.0.0 



CSM DID NOT CLEAR OLD PSW BITS <3:0> 
OLDPSW TESTNO ERR PC 
CSn3RD- TESTNO, SERRPC.O 
0.0.0.0 



CSM ACCESSED WRONG SUPERVISOR SPACE 
TESTNO ERR PC 
TESTNO. SERRPC.O 
0.0.0 



CSM ABORTED WHEN IT SHOULD NOT HAVE 
TESTNO ERR PC 
TESTNO. SERRPC.O 
0.0,0 

CSM FAILED TO INCR»^MENT/DECREMENT REGISTER PROPERLY 
TESTNO ERR PC RO EXP RO RCV 
TE S TNO , SERRPC . S TMPO . SRE60 . 0 

0.0.0,6 



E 

CKKTBDO 11 /4A MEM MGMT PRT B MACRO H1 11 3 12-JAN-82 12:19 PAGE 26 
ERROR POINTER TABLE 

1510 , .-^I^EW 53 

1511 002040 012413 EM57 

1512 002042 015246 0H57 

1513 002044 016022 0T57 

1514 002046 016050 Of 5 

1516 .•*JTEM 54 

1517 002050 012466 EW58 
1518 

1520 002052 013522 DH20 

1521 002054 015476 DT20 

1522 002056 016050 OfZ 



SEQUENCE 



:SM FAILED TO PUT PROPER ARGUMENT ON STACK 
TESTNO ERR PC ARGEXP AR6RCV 
TESTN0,$ERRPC.$THP1.$TMP2.0 
0.0.0.0 

SR2 LOCKED UP AN 11/34 COMPATIBLE ADDRESS THAT 
DOES NOT MAKE IT COMPATIBLE WITH AN 11/70 SINCE 
THE OPTIONAL M7095 ECO #8 IS MISSING 
SR2 WAS EXPECTD TESTNO ERRORPC 
WASSR2.$REG1, TESTNO, SERRPC.O 
0.0.0.0 



CKKTBOO 11/44 
ERROR POINTER 

1523 
1524 
1525 
1526 
1527 
1528 
1529 
1530 
1531 

1532 002060 

1533 002060 
153A 

1535 002064 

1536 002070 

1537 002074 

1538 002076 

1539 002100 

1540 002104 

1541 002106 

1542 002112 

1543 002114 

1544 002120 

1545 002122 

1546 002126 

1547 002130 

1548 002134 

1549 002140 

1550 002144 

1551 002146 

1552 002150 

1553 002152 

1554 002156 

1555 002160 

1556 002164 

1557 002170 

1558 002174 

1559 002176 

1560 002202 

1561 002206 

1562 002210 

1563 002214 

1564 002216 

1565 002220 

1566 002224 

1567 002230 



nen ncnr 

TABLE 
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F 

27 



SEQUENCE 



012700 077406 



012702 
012701 
010022 
077102 
020227 
001003 
012702 
000766 
020227 
001003 
012702 
000760 
012701 
012702 
012703 
005000 
010021 
010022 
062700 
077305 
012711 
012712 
020127 
001005 
012701 
012702 
000754 
020127 
001401 
000207 
012701 
012702 
000743 



172300 
000020 



172340 

172200 

172240 

177600 

172340 
172360 
000007 

000200 

177600 
1 77600 
172356 

172240 
172260 

172256 



177640 
177660 



S8TTL INITIALIZE ALL PAR'S AND PDR'S 

» ***** SUBROUTINES UNIQUE TO THIS PROGRAM ***** 

• A************************** ************************************ 

9 

• THIS ROUTINE WILL INITIALIZE ALL KERNAL. SUPERVISOR. AND 

• USER PAR'S AND PDR'S TO THEIR USUAL INITIAL VALUE 
* 



APR INI T: 

MOV *77406.R0 

MOV #KIPDR0.R2 

1$: MOV #20.ft1 

2$; MOV R0,(R2)* 

308 R1.2$ 

CMP R2.mPDR7*2 

BNE 3S 

MOV #SIPDR0,R2 

BR 1S 

3$: CMP R2./irSDPDR7*2 

BNE 4S 

MOV #UIPDR0,R2 

BR 1S 

4$: MOV /rKlPAR0,R1 

MOV *KDPAR0,R2 

5$: MOV *7.R3 

CLR RO 

6$: MOV RO.(Rl)* 

MOV R0.(R2)* 

ADD *200-R0 

SOB R3,6i 

MOV #1 77600, (Rl) 

MOV #1 77600. (R2) 

CMP R1,#KIPAR7 

BNE 7$ 

MOV fSIPARO.Rl 

MOV #SDPAR0.R2 

BR 5S 

7$: CMP R1,#SIPAR7 

BEQ 8S 

RTS PC 

8$: MOV #UIPAR0.R1 

MOV «UDPAR0.R2 

BR 5S 



MAKE ALL PDR'S 4K, READ/WRITE. UPWARDS 
EXPANDING. 200 BLOCKS 

LOAD THE ADDRESS OF THE FIRST KERNAL PDR 

LOAD R1 WITH 16 

LOAD EACH PDR IN TURN 

LOOP UNTIL ALL ARE LOADED 

HAVE WE LOADED ALL KERNAL PDR'S 

BRANCH IF KERNAL I SUPER HAVE BEEN LOADED 

LOAD ALL SUPERVISOR PDR'S 

BRANCH TO LOOP 

HAVE USER PDR'S BEEN DONE 

BRANCH IF THEY HAVE 

LOAD ALL USER PDR'S 

BRANCH TO LOOP 

LOAD R1 WITH ADDRESS OF KIPARO 
LOAD R2 WITH ADDRESS OF KDPARO 
LOAD LOOP COUNTER WITH 7 
CLEAR PAR /ALUE REGISTER 
LOAD AN I -SPACE PAR 
LOAD A D-SPACE PAR 
INCREASE THE PAR VALUE BY 200 
LOOP UNTIL 7 PAR'S ARE LOADED 
MAP 1 -SPACE PAR7 TO I/O PAGE 
MAP D-SPACE PAR7 TO I/O PAGE 



.•BRANCH TO USER LOAD ROUTINE 
.•RETURN TO CALLING ROUTINE 



CKKTBDO 


11/44 MEH MGMT 


0-SPACE 


TESTS MEMORY 


1568 






1569 






1570 






1571 






1572 






1573 






1574 






1575 






1576 






1577 






1578 






1579 






1580 






1581 


002232 




1582 


002232 


042737 


1583 


002240 


005227 


158A 


002242 


M7777 


1585 


002244 


001401 


1586 


002246 


000000 

www 


4 f A 

1587 






1588 






1589 






1590 






1591 


002250 


011637 


1592 


002254 


012637 


4 

1593 


002260 


012637 


1594 


002264 


013737 


1595 


002272 


013737 


1596 


002300 


013737 


1597 


002306 


005737 


1598 


002312 


100002 


1599 


002314 


104034 


1600 


002316 


000401 


1601 


002320 


104002 


1602 


002322 


042737 


1603 


002330 


012737 


16U4 


002336 


013746 


1605 


002342 


013746 


1606 


002346 


052737 


1607 


002354 


000006 
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G 

28 



SEQUENCE 



000004 172516 



S8TTL D-SPACE TESTS MEMORY MANAGEMENT ABORT SERVICE ROCITINE 
**************************************************************** 

THIS ROUTINE WILL BE ENTERED IF A MEMORY MANAGEMENT ABORT OCCURS 
DURING THE D-SPACE ENABLE TESTS. IF THE ABORT IS A NON-RESIDENT 
ABORT, THE PROBLEM IS PROBABLY IN THE D-SPACE ENABLE LOGIC. IN 
ALL OF THE D-SPACE ENABLE TESTS. D-SPACE PAGES 1 4 3 ARE MAPPED 
NON-RESIDENT AND I-SPACE PAGE 3 IS MAPPED NON-RESIDENT. ALL 
OTHER PAGES ARE MAPPED RESIDENT, 4lC, READ/WRITE. THEREFORE. IF 
THE NON-RESIDENT PAGE IS 1 OR 3 YOU ARE NOT FORCING I-SPACE WHEN 
YOU SHOULD. IF THE NON-RESIDENT PAGE IS 3. AND YOU ARE IN TEST 
15. YOU ARE PROBABLY FORCING I-SPACE WHEN YOU SHOULD BE ALLOWING 

D-SPACE. 
ft***************************** 

NdDSPAC 



BIC 
INC 

NDFLAG: .WORD 
BEO 
HALT 



#BJT2.MMR3 
(PC) + 
-1 
lOS 



001304 




lOS: 


MOV 


(KSP) .BADPC 


001260 






MOV 


(KSP)*.TRAPPC 


001262 






MOV 


(XSP)+,TRAPPS 


177572 


001264 




MOV 


MMRO.WASSRO 


177574 


001266 




MOV 


MMRl.WASSRl 


177576 


001270 




MOV 


mR2. WASSR2 


001264 




TST 


WASSRO 






BPL 


1S 








ERROR 


♦34 








BR 


2S 






1$: 


ERROR 


+2 


177376 


177572 


2$: 


BIC 


#1 77376. MMRO 


U7777 


002242 




MOV 


#-1 .NDFLAG 


001262 






MOV 


TRAPPS.-(KSP) 


001260 






MOV 


TRAPPC.-CKSP) 


000004 


172516 




BIS 


#8IT2.MMR3 








RTT 





********************************* 

STARTING ADDRESS FOR ABORT SERVICE ROUTINE 
TURN OFF D-SPACE BEFORE DOING ROUTINE 
MAKE FLAG ZERO IF THE FIRST TIME 
FLAG SHOULD BE -1 
BRANCH IF FIRST TIME IN ROUTINE 
I HAVE ENTERED THIS ROUTINE BEFORE 
THE FIRST ERROR IS REPORTED; THE SECOND 
ENTRY ADDRESS IS ON THE STACK. AND THE 
FIRST ERROR CONDITION IS PROBABLY STILL 
LOCKED UP. 

SAVE PC AT TIME OF ABORT OR TRAP 

SAVE RETURN ADDRESS IN CASE OF LOOP 

SAVE OLD PSW IN CASE OF LOOP 

SAVE STATUS REGISTER 

SAVE AUTO INCR/DECR REGISTER 

SAVE VIRTUAL ADDRESS REGISTER 

WAS ABORT NON-RESIDENT? 

BRANCH IF ABORT NOT EXPECTED 

D-SPACE ENABLE FAULTY 

BRANCH TO EXIT 

UNEXPECTED M.M. ABORT 

CLEAR ALL BITS EXCEPT 0 AND 8 

MOVE A -1 TO THE FLAG 

PUSH OLD PSW ONTO STACK 

PUSH OLD PC ONTO STACK 

TURN D-SPACE BACK ON 

RETURN TO MAIN PROGRAM 



CKKTBDO 11 /4A MEM HGMT PRT B 
TURN OFF T-BIT AND SAVE CURRENT 



1608 
1609 
1610 
1611 
1612 
1613 
16U 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 



MACRO 
PSU 
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SEQUENCE 33 



002356 
002364 
002366 
002372 



033727 
001411 
013746 
011637 



002376 042716 000020 

002402 012746 002410 

002406 000006 

002410 000207 



.SBTTL TURN OFF T-BIT AND SAVE CURRENT PSW 

THIS SUBROUTINE IS USED TO TURN OFF THE TRACE TRAP BIT IN 
THE PSU IF IT IS ON. THE PROCESSOR STATUS IS SAVED IN 
"T8ITPS" SO THAT THE PSW CAN BE RESTORED TO ITS PREVIOUS 
CONDITION WHEN CONDITIONS WARRANT T-BIT TRAPPING. 



177776 000020 TOFF 

177776 
001274 



1$: 



BIT 
6EQ 
MOV 
MOV 

BIC 
MOV 
RTT 
RTS 



PSW,#TBIT 
1$ 

psw,-(SP) 

(SPJ.TBITPS 

#T8IT,(SP) 
#1$.-(SP) 

PC 



IS THE T-BIT SET IN THE PSW? 
EXIT IF NO 

PUSH PRESENT PSW ON THE STACK 
ALSO SAVE IT IN "TBI TPS" FOR 
RESTORING LATER 

CLEAR THE T-BIT (BIT 4) IN THE PSW 
PUSH PC OF "RTS" ON STACK 
"RETURN" TO IS WITH T-8IT OFF 
RETURN TO PROGRAM 



CKKTBDO 11/44 MEM 
TURN ON T-BIT AND 



MGMT PRT 8 MACRO Ml 113 
RESTORE PREVIOUS PSU 
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I 

30 



SEQUENCE 3A 



1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 

1634 002412 033^27 

1635 002420 001410 

1636 002422 013746 

1637 002426 012737 

1638 002434 012746 

1639 002440 000006 

1640 002442 000207 



001274 
000340 
002442 



.S8TTL TURN ON T-BH AND RESTORE PREVIOUS PSU 

••*••»***•**♦**•**•*•*********»****♦•**•***********************•• 



• * 

;* 

• * 



THIS SUBROUTINE IS USED TO RESTORE THE PROCESSOR STATUS 
TO ITS PREVIOUS CONDITION BY RESTORING THE "T-BIT PSU" 
SAVED BY THE "TOFF" SUBROUTINE IN THE "TBI TPS" LOCATION. 



• *************************************************************** 



001274 000020 TON: 



001274 



1$: 



BIT 
BEQ 
MOV 
MOV 
MOV 
RTT 
RTS 



T8ITPS.#TBIT 
1$ 

T8ITPS.-(SP) 
#340. TBI TPS 
#1$.-(SP) 

PC 



UAS T-BIT ON IN THE PREVIOUS PSW? 
EXIT If NO 

PUSH PREVIOUS PSU ON THE STACK 
RESET THE "TBI TPS" LOCATION 
PUSH PC OF "RTS" ON STACK 
"RETURN" TO 1$ UITH T-BIT RESTORED 
RETURN TO PROGRAM 



CKHTBDO 11 
SUBROUTINE TO 



1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 
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J 

31 



SEQUENCE 



002444 005726 

002446 012737 000001 

002454 011646 

002456 162716 000004 

002462 000207 



.S8TTL SUBROUTINE TO PREPARE ERLOOP. THE STACK AND EXIT TO ERROR 

THIS SUBROUTINE IS USED BY THE THREE SUBROUTINES MFPITS. HTPITS AND 
MFPDTS WHEN AN ERROR IS CALLED. THE RETURN ADDRESS IS POPPED AS 
RETURN IS NOT BACK TO THE SUBROUTINE, BUT TO THE TEST ERROR CALL. THIS 
ROUTINE SETS LOCATION ERLOOP, DUPLICATES THE RETURN ADDRESS ON THE 
STACK FOR POSSIBLE LOOP ON ERROR, AND CORRECTS THE RETURN ADDRESS TO 
POINT TO THE ERROR CALL 4 LOCATIONS BACK FROM THE "TEST PASSED" LOCA- 
TION DUPLICATED. NOTE THE "TEST PASSED" RETURN ON THE STACK IS NOT 
TOUCHED FOR PROBABLE LATER USE WHEN LOOPING IS NO LONGER ENABLED. 

(•***«••*♦•»***•»«***•»•••♦••*•****•»*•*♦*♦♦♦**♦**•♦**♦***♦♦*♦* 



002624 



ERPREP: 



TST 
MOV 
MOV 
SUB 
RTS 



(SP)* 
*1. ERLOOP 
(SP).-(SP) 
#4,(SP) 
PC 



POP RETURN OF THIS ROUTINE - NOT USED 
SET ERROR LOOPING FLAG INDICATING AN ERROR 
DUPLICATE RETURN PC AND 
FUDGE FOR ERROR RETURN 
RETURN TO THE ERROR CALL IN THE TEST 



CtCKTBDO 11/44 MEH MGHT PRT B MACRO Bill 3 
SUBROUTINE TO TEST HFPl INSTRUCTION 



< 3 



1659 

1660 

1661 

1662 

1663 

1664 

1665 

1666 

1667 

1668 

1669 

1670 

1671 

1672 

1673 

1674 

1675 

1676 

1677 

1678 

1679 

1680 

1681 

1682 

1683 

1684 

1685 

1686 

1687 

1688 

1689 

1690 

1691 

1692 

1693 

1694 

1695 

1696 

1697 

1698 

1699 

1700 

1701 

1702 

1703 

1704 
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SEQUENCE 36 



002464 
002470 
002472 
002476 
002502 
002506 
002512 
00?*^ 16 
00c j20 
O02522 
002524 
002532 
002536 
002544 
002546 
002550 
002552 
002560 
002564 
002570 

002574 
002600 
002602 
002610 
002614 
002620 
002622 
002624 



005037 
011605 
012537 
012537 
062716 
010637 
011637 
012737 
000000 
177776 
017737 
000000 
012737 
012601 
020001 
001411 
012737 
013706 
013716 
004737 

005737 
001346 
012737 
013706 
013716 
000207 
000000 
000000 



002624 

002532 
002534 
000010 
001176 
001200 



000072 
000000 
016142 



000340 
001176 
001200 
002444 

002624 

000340 
001176 
001200 



USAGE OF THE SUBROUTINE BELOW IS AS FOLLOWS: 



MOV #MFPI LP. SLPERR 

MOV #(NUMB),MFPIPS 

MOV #TRAPRTN.MFPIVC 

MOV #(NUMB),R2 



PUT ADDRESS OF LOOPING LOCATION IN SLPERR 
PUT PS PREVIOUS/CURRENT MODE VALUE IN THIS LOCATION 
LOAD THE TEST EXCLUSIVE TRAP ROUTINE TO HFPIVC 
SETUP ADDRESS IN R2 



(IT IS ASSUMED THAT ALL PDR^S/PAR'S WILL ALSO BE SET UP PROPERLY) 



JSR 
MFPI 
NOP 
ERROR 
TST 



PCMFPITS 
(MODE) 

+(NUMB) 
(SP) + 



60 DO THE TEST 
MFPI INSTRUCTION TO TEST IS PUT HERE 
NEEDED FOR MODES 1,2.4. I 5 *ONLY» 
RETURN IS HERE FOR ERROR CALLS 

POP STACK - EXTRA RETURN INSTALLED BY SUBRTN NOT NEEDED 



000250 
00025C 



177776 



MFPI LP 
MFPIPS 



MFPILD 



177776 



*********** 

HFPITS: CLR 
MOV 
MOV 
MOV 
ADD 
MOV 
MOV 
MOV 
.WORD 
.WORD 
MOV 
.WORD 
MOV 
MOV 
CMP 
BEO 
MOV 
MOV 
MOV 
JSR 
TIGHTER 
TST 
6NE 
MOV 
MOV 
MOV 
RTS 

MFPIVC: .WORD 
ERLOOP: .WORD 



**************************************************** 



;FOR 
1$: 



ERLOOP 
(SP),R5 
(R5)*,MFPILD 
(R5)*.MFPlLD+2 
#10. (SP) 
SP.STMPO 
(SP),$TMP1 
(PC)*.a(PC)* 
0 

PSW 

aMFPIVC.MMVEC 
0.0 

fMGMERR.MMVEC 

(SP)+.R1 

R0.R1 

1$ 

#340-PSW 
$TMPO,SP 
$TMP1,(SP) 
PCERPREP 
SCOPE LOOP. REPLACE 
ERLOOP 
MFPILP 
#340.PSW 
STMPO.SP 
$TMP1.(SP) 
PC 
0 
0 



CLEAR ERROR LOOPING FLAG 
MOVE STACK POINTER 10 R5 FOR SUBROUTINE LOADING 
MOVE MFPI INSTRUCTION TO LOCATION 
MOVE NEXT WORD TO LOCATION 
FUDGE RETURN TO "TEST PASSED" LOCATION 
SAVE THE STACK POINTER AND 
SAVE THE RETURN ADDRESS 

SETUP PSW AS DEFINED BY LOADED VALUE IN PRVMD1 
LOCATION TO HOLD SUPER/USER PREVIOUS MODE 
LOAD THE PSW 

SET M.M. VECTOR TO MFPIVl 

LOCATIONS TO HOLD MFPI INSTRUCTION UNDER TEST 

SET M.M. VECTOR TO NORMAL ROUTINE 

POP SUPERVISOR/USER/KERNEL STACK INTO R1 

WAS DATA FETCHED SAME AS STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

GO TO KERNEL MODE 

RESET SP 

RESET RETURN ADDRESS 

GO PREPARE LOCATION ERLOOP. RETURN PC S EXIT TO ERROR 
JSR PC.ERPREP" WITH 'BR MFPILP" = 000767 
CHECK TO SEE IF THIS •T>ASSED" IS IN AN ERROR LOOP 
BRANCH BACK IF SO 
GET BACK TO KERNEL MODE 
RESET SP 

RESET RETURN ADDRESS 
EXIT - TEST PASSED 

LOCATION TO HOLD ADDRESS OF MM TRAP CATCHER 
LOCATION USED TO FLAG AN ERROR CONDITION 



CUKTBOO MEM MGMT PRT B MACRO Ml 113 

SUBROUTINE TO CHECK THE MTPI INSTRUCTION 
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SEQUENCE 57 



1705 
1706 
1707 
1708 
1709 
1710 
1711 
1712 
1713 
171A 
1715 
1716 
1717 
1718 
1719 
1720 
1721 
1722 
1723 
1724 
1725 
1726 
V27 
1728 
1729 
1730 
1731 
1732 
1733 
1734 
1735 
1736 
1737 
1738 
1739 
1740 
1741 
1742 
1743 
1744 
1745 
1746 
1747 



.S8TTL SUBROUTINE TO CHECK THE MTPI INSTRUCTION 



002626 
002632 
002634 
002640 
002644 
002650 
002654 
002656 
002660 
002662 
002664 
002670 
002676 
002702 
002710 
002716 
002720 
002722 
002724 
002726 
002730 

002734 
002740 
002742 
002/44 



005037 
011605 
012537 
012537 
012537 
062716 
012737 
000000 

1 nut 

010046 
105037 
017737 
000000 
012737 
112737 
062702 
000000 
011201 
020001 
001402 
004737 

005737 
001345 
000207 
000000 



002624 

002676 
002700 
002720 
000012 



172310 
000050 
000000 
016142 
000006 



002444 
002624 



000250 

000250 
172310 



*»♦«*♦♦♦»*»*****«♦♦***»»*»♦»»•»»»»•••**»*»*•*»*****•****•****»• 

USAGE OF THE SUBROUTINE BELOW IS AS FOLLOWS: 



MOV #MTPILP.$LPERR 

MOV #(NUM8) .MTPIPS 

MOV #TRAPRTN.HTPIVC 

MOV /r(NUM6),R2 
(IT IS ASSUMED THAT ALL PDR 

JSR PC.MTPITS 

MTPI (MODE) 
NOP 

ERROR XNUMB) 

TST (SP)+ 



PUT ADDRESS OF LOOPING LOCATION IN $LPERR 

PUT PS PREVIOUS/CURRENT MODE VALUE IN THIS LOCATION 

LOAD THE TEST EXCLUSIVE TRAP ROUTINE TO MTPIVC 

SETUP ADDRESS IN R2 

S/PAR'S WILL ALSO BE SET UP PROPERLY) 

GO DO THE TEST 

MTPI INSTRUCTION TO TEST IS PUT HERE 
NEEDED FOR MODES 1,2,4. S 5 *ONLY* 
RETURN IS HERE FOR ERROR CALLS 

POP STACK - EXTRA RETURN INSTALLED BY SUBRTN NOT NEEDED 



i ******** »**♦******♦»*»*•***»******♦*****♦************ ********** 



MTPITS: 



MTPILP: 
MTPIPM: 



MTPILD; 



MTPITA: 



CLR ERLOOP 

MOV (SP).R5 

MOV (R5)*, MTPILD 

MOV (R5)+,MTPILD*2 

MOV (R5)+, MTPITA 

ADD #12.<SP) 

MOV (PC)*,a(PC)* 

.WORD 0 

.WORD PSW 

MOV RO,-(KSP) 

CLRB KIPDR4 

MOV aMTPIVCHMVEC 

.WORD 0,0 

MOV #M6MERR.MMVEC 

MOVB #006,KIPDR4 

ADD {PC)*,R2 

.WORD 0 

MOV (R2),R1 

CMP R0.R1 

BEQ IS 

JSR PCERPREP 



.CLEAR ERROR LOOPING FLAG 
.•MOVE STACK POINTER TO R5 FOR LOADING 
.•MOVE MTPI TO LOCATION 
.-MOVE NEXT WORD TO LOCATION 
;MOVE NUMBER TO ADD TO R2 TO LOCATION 
.•FUDGE RETURN TO 'TEST PASSED" LOCATION 
.•MAKE PREVIOUS MODE USER/SUPERVISOR 
.•LOCATION TO HOLD PREVIOUS MODE USER OR SUPER 
;LOAD THE PSW 

;PUSH TEST DATA ON KERNEL STACK 
.•MAKE KERNEL I PAGE 4 NON-RESIDENT 
.-SET MM TO VECTOR IN MTPIVC 

.•LOCATIONS USED TO PLACE THE MPTI INSTRUCTION 
.•RESTORE MM VECTOR TO NORMAL ROUTINE 
.•MAKE KERNEL PAGE 4 RESIDENT 
;ADD NUMBER TO R2 TO UNDO INCREMENT/DECREMENT 
.•LOCATION TO HOLD -2, 0. +2 OR 100000 
.-READ FROM ADDRESS 60000 
;SEE IF DATA WAS STORED AT CORRECT PLACE 



•BRANCH IF IT WAS 

•GO PREPARE LOCATION ERLOOP. RETURN PC I EXIT TO ERROR 
.-FOR TIGHTER ERROR LOOP. REPLACE "JSR PC.ERPREP" WITH 'BR MTPILP" = 000754 
1$: TST ERLOOP ;SEE IF THIS "MASSED" WAS IN AN ERROR LOOP 

BNE MTPILP .-BRANCH BACK IF SO 

RTS PC .-EXIT - TEST PASSED 

MTPIVC: .WORD 0 ;LOCATION TO HOLD MM VECTOR TO LOAD 
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SUBROUTINE TO CHECK THE MFPD INSTRUCTION 



12-JAN-82 12:19 



PAGE 34 



SEQUENCE 38 



17A8 
-.749 
1750 
1751 
1752 
1753 
1754 
1755 
1756 
1757 
1758 
1759 
1760 
1761 
1762 
1763 
1764 
1765 
1766 
1767 
1768 
1769 
1770 
1771 
1772 
1773 
1774 
1775 
1776 
1777 
1778 
1779 
1780 
1781 
1782 
1783 



002746 
002752 
002754 
002760 
002764 
002770 
002772 
002774 
002776 
003004 
003010 
003016 
003020 
003022 
003024 
003030 
003034 
003036 
003040 



005037 
011605 
012537 
012537 
062716 
012737 
000000 
177776 
017737 
000000 
012737 
012601 
020001 
001402 
004737 
005737 
001355 
000207 
000000 



.S8TTL SUBROUTINE TO CHECK THE MFPD INSTRUCTION 



002624 

003004 
003006 
000010 



000036 
000000 
016142 



002444 
002624 



USAGE Of THE SUBROUTINE 6EL0U IS AS FOLLOWS: 



MOV 
MOV 
MOV 
MOV 



#MFPDLP.$LPERR 
#(NUM8).MFPDPS 



;PUT ADDRESS OF LOOPING LOCATION IN JLPERR 
;PUT PS PREVIOUS/CURRENT MODE VALUE IN THIS LOCATION 



*TRAPRTN.MFPDVC ;LOAD THE TEST EXCLUSIVE TRAP ROUTINE TO HFPDVC 



#(NUM8),R2 



SETUP ADDRESS IN R2 



(IT IS ASSUMED THAT ALL PDR^S/PAR'S WILL ALSO BE SET UP PROPERLY) 



JiR 
MFPD 
NOP 
ERROR 
TST 



PC.MFPDTS 
(MODE) 

+(NUMB) 
(SP) + 



GO DO THE TEST 
MFPD INSTRUCTION TO TEST IS PUT HERE 
NEEDED FOR MODES 1,2.4, t 5 •ONLY* 
RETURN IS HERE FOR ERROR CALLS 

POP STACK - EXTRA RETURN INSTALLED BY SUBRTN NOT NEEDED 



**************************************************************** 



000250 
000250 



MFPDTS: CLR 
MOV 
MOV 
MOV 
ADD 

MFPDLP: MOV 
MFPDPS: .WORD 
.WORD 
MOV 

MFPDLD: .WORD 
MOV 
MOV 
CMP 
BEQ 
JSR 

1$: TST 
BNE 

RTS 

MfPDVC: .WORD 



ERLOOP 

(SP>. R5 

(R5)+.MFPDLD 

(R5)*,MFPDLD+2 

#10, (SP) 

(PC)+,a(PC)+ 

0 

PSW 

aMFPDVCMMVEC 

0,0 

#MGMERR,MMVEC 
(SP)>. R1 
RO.Rl 
IS 

PCERPREP 

ERLOOP 

MFPDLP 

PC 

0 



CLEAR THE ERROR LOi^PING FLAG 
MOVE RETURN ADDRESS TO R5 FOR LOADING 
MOVE MFPD INSTRUCTION TO THE LOCATION BELOW 
MOVE NEXT WORD TO THE NEXT LOCATION 
FUDGE RETURN TO THE "TEST PASSED" LOCATION 
SET UP PSW AS LOADED BY TEST RUNNING THIS SUBROUTINE 
LOCATION TO HOLD NUMBER TO LOAD THE PSW 
LOAD THE PSW 

SET M.M. VECTOR TO TRAP CATCHER OF THE TEST 

LOCATIONS TO HOLD THE MFPD INSTRUCTION 

RESTORE MM VECTOR TO NORMAL ROUTINE 

POP K/S/U STACK INTO R1 

WAS DATA FETCHED SAME AS DATA STORED 

BRANCH IF CORRECT DATA WAS FETCHED 

GO PREPARE ERLOOP, STACK AND EXIT TO ERROR CALL 

SEE IF THIS "PASSED" IS IN AN ERROR LOOP 

BRANCH BACK IF SO 

EXIT - TEST PASSED 

LOCATION TO HOLD MM VECTOR OF TEST 



CKKTBOO 11/44 MEM M6MT PRT B 
SCOPE HANDLER ROUTINE 

1785 
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SEQUENCE 39 



.S8TTL SCOPE HANDLER ROUTINE 

***************************************************************** 

•'♦THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 

.••AND LOAD THE TEST NUMBER (STSTNM) INTO THE DISPLAY REG. (DISPLAr<7:0» 

;*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAy<15:08> 

.-•THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

.••SWU=1 LOOP ON TEST 

:*SW09=1 LOOP ON ERROR 

;*SU08=1 LOOP ON TEST IN SWR<7:0> 

;*CALL 

SCOPE ;; SCOPE =IOT 



0O30A2 








$SCOPE : 




003042 


104410 








CKSWR 


003044 


032777 


040000 


1 76066 


IS: 


BIT 


003052 


001077 








BNE 










;*****START OF 


003054 


000416 






SXTSTR: 


BR 


003056 


013746 


000004 






MOV 


003062 


012737 


003102 


000004 




MOV 


003070 


005737 


1 77060 






TST 


003074 


012637 


000004 






MCV 


003100 


000446 








BR 


003 ■'02 


022626 






5$: 


CMP 


003104 


012637 


000004 






MOV 


003110 


000434 








BR 


003112 








6$::/y/ymEND 0 


003112 


032777 


000400 


176020 




BIT 


003120 


001404 








BEQ 


003122 


127737 


176012 


001102 




CMP8 


003130 


001450 








BEQ 


003 1 32 


013737 


1 77766 


003266 


2$: 


MOV 


003140 


032737 


000001 


003266 




BIT 


003146 


001406 








BEQ 


003150 


042737 


000001 


1 77766 




BIC 


003156 










EMT 


003160 


105037 


001103 






CLRB 


003164 


105737 


001103 




2000$: 


TST8 


003170 


001412 








BEQ 


003172 


012777 


001000 


175740 




BIT 


003200 


001404 








BEQ 


003202 


013737 


001110 


001106 


7$: 


MOV 


003210 


000420 








BR 


003212 


105037 


001103 




4$: 


CLRB 


003216 


105237 


001102 




SSVLAD: 


INC6 


003222 


113737 


001102 


001230 




MOVB 


003230 


011637 


001106 






MOV 


003234 


011637 


00111U 






MOV 


003240 


005037 


001212 






CLR 


003244 


112737 


000001 


001115 




MOVB 


003252 


013777 


001102 


175662 


SOVER • 


MOV 


003260 


013716 


001106 






MOV 


003264 


000002 








RTI 


003266 


000000 






CPSAVE : 


.WORD 



/r6IT14,aSUR 
SOVER 
CODE FOR THE XOR 
6S 

a*ERRVEC,-{SP) 

#5$,a*ERRVEC 

9*177060 

(SPJ+,a*ERRVEC 

SSVLAD 

(SPJ-*.(SP)-* 

(SPJ-*,a#ERRVEC 

7S 

■ CODE FOR THE XOR 
#BJT08,aSUR 
2$ 

aSWR, STSTNM 
SOVER 

177766. CPSAVE 
#81 TOO. CPSAVE 
2000S 

*8I TOO. 177766 

♦ 177 

SERFLG 

SERFLG 

SSVLAD 

#8IT09.aSUR 

4S 

SLPERR.SLPADR 
SOVER 
SERFLG 
STSTNM 

STSTNM, STESTN 

(SP).SLPADR 

(SP).SLPERR 

SESCAPE 

#1.SERMAX 

STSTNM.aDI^oLAY 

SLPADR.CSP) 



.-TEST FOR CHANGE IN SOFT-SWR 
.•LOOP ON PRESENT TEST? 
;YES IF SW14=1 

tester##### 

;IF RUNNING ON THE "XOR" TESTER CHANGE 
;THIS INSTRUCTION TO A "NOP" {NOP=240) 
.•SAVE THE CONTENTS OF THE ERROR VECTOR 
;SET FOR TIMEOUT 
.•TIME OUT ON XOR? 
.•RESTORE THE ERROR VECTOR 
;60 TO THE NEXT TEST 
.•CLEAR THE STACK AFTER A TIME OUT 
.•RESTORE THE ERROR VECTOR 
.•LOOP ON THE PRESENT TEST 
TESTER#*#*# 
;LOOP ON SPEC. TEST? 
;8R IF NO 

.-ON THE RJGHT TEST? SWR<7:0> 
'BR IF YES 

MOVE CPU ERR REG VALUE TO LOC FOR TST 
SEE IF THE POWER MONITOR BIT IS ON 
BRANCH TO CONTINUE ROUTINE IF CLEAR 
CLEAR THE BIT FOUND TO BE SET 
CALL SPECIAL POWER FAIL BIT ERROR CALL 
CLEAR THE ERROR FLAG 
HAS AN ERROR OCCURRED? 
8R IF NO 
LOOP ON ERROR? 
BR IF NO 

SET LOOP ADDRESS TO LAST SCOPE 

ZERO THE ERROR FLAG 
COUNT TEST NUMBERS 
SET TEST NUMBER IN APT MAILBOX 
SAVE SCOPE LOOP ADDRESS 
SAVE ERROR LOOP ADDRESS 
CLEAR THE ESCAPE FROM ERROR ADDRESS 
ONLY ALLOW ONECD ERROR ON NEXT TEST 
DISPLAY TEST NUMBER 
FUDGE RETURN ADDRESS 
FIXES PS 

LOCATION TO SAVE CPU ERR REG CONTENTS 



DPM001 
DPMOOl 
DPM001 
DPMOOl 
DPMOOl 
DPMOOl 



; DPMOOl 
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.SeTTL ERROR HANDLER ROUTINE 



SEQUENCE 



•THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
•SAVE THE ERROR ITEM NUTOER AND THE APDRESS OF THE ERROR CALL 
•AND GO TO ERRTYP ON ERROR 

•THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE : 



•SW15=1 
•SW13=1 
•SW10=1 
•SW09=1 
•CALL 



HALT ON ERROR 
INHIBIT ERROR TVPEOUTS 
BELL ON ERROR 
LOOP ON ERROR 



ERROR N 



003270 


105037 


003646 




SERROR: 


CLR8 


I8SAVE 


003274 


104410 








CKSWR 




003276 


010037 


001162 






MOV 


RO.$REGO 


003302 


010137 


001164 






MOV 


R1.$REG1 


003306 


010237 


001166 






MOV 


R2,$REG2 


003312 


010337 


001170 






MOV 


R3.$HEG3 


003316 


010437 


001172 






MOV 


R4,$REG4 


003322 


010537 


001174 






MOV 


R5.$REG5 


003326 


113737 


001102 


001254 




M0V8 


$TSTNM,TESTNO 


003334 


105237 


001103 




7$; 


iNce 


$ERFL6 


003340 


001775 








BEQ 


7$ 


003342 


013777 


001102 


175572 




MOV 


$TSTNM,aDISPLAY 


003350 


032777 


002000 


175562 




BIT 


«8lT10,aSUR 


003356 


001402 








BEQ 


1$ 


003360 


104401 


001214 






TYPE 


,$eELL 


003364 


005237 


001112 




1$: 


INC 


$ERTTL 


003370 


011637 


001 1 16 






MOV 


(SP). $ERRPC 


003374 


162737 


000002 


001116 




sue 


*2.$ERRPC 


003402 


1 17737 


175510 


001114 




MOVB 


8$ERRPC.$ITEMB 


003410 


122737 


0001 77 


001 1 14 




CMP8 


#177,$ITEMe 


003416 


001426 








BEQ 


1001$ 


003420 


105737 


003646 






TSTB 


I8SAVE 


003424 


001021 








BNE 


1000$ 


003426 


013o7 


1 fff 00 


003266 




MOV 


1 77766, CPSAVE 


003434 


032737 


000001 


003266 




BIT 


#8IT00.CPSAVE 


003442 


001414 








BEQ 


10011 


003444 


042737 


000001 


177766 




BIC 


#81 TOO, 177766 


003452 


113737 


001114 


003646 




MOVB 


$ITE«8.IBSAVE 


003460 


112737 


000177 


001114 




MOVB 


#177.$ITEMB 


003466 


000402 








BR 


1001$ 


003470 


105037 


003646 




1000$: 


CLR8 


IBSAVE 


003474 








1001$: 






003474 


012777 


020000 


175436 




BIT 


«8IT13,aSUR 


003502 


001004 








BNE 


20$ 


003504 


004737 


003650 






JSR 


PC. ERRTYP 


003510 


104401 


001221 






TYPE 


,$CRLF 


003514 








20$: 




003514 


122737 


000001 


001244 




CMPB 


#APTENV,$ENV 


003522 


001007 








BNE 


2$ 


003524 


113737 


001114 


003536 




MOVB 


$ITEMe,21$ 


003532 


004737 


006014 






JSR 


PC.$ATY4 


003536 


000 






21$: 


.BYTE 


0 


003537 


000 








.BYTE 


0 



;;ERR0R=EMT AND N=ERR0R ITEM NUMBER 



CLEAR THE ITEM BYTE SAVE LOCATION 

.•TEST FOR CHANGE IN SOFT-SUR 

SAVE THE CONTENTS OF RO 

SAVE THE CONTENTS OF R1 

SAVE THE CONTENTS OF R2 

SAVE THE CONTENTS OF R3 

SAVE THE CONTENTS OF R4 

SAVE THE CONTENTS OF R5 

SAVE THE TEST NUMBER 

SET THE ERROR FLAG 

DON'T LET THE FLAG GO TO ZERO 

DISPLAY TEST NUMBER AND ERROR FLAG 

BELL ON ERROR? 

NO - SKIP 

RING BELL 

COUNT THE NUMBER OF ERRORS 

GET ADDRESS OF ERROR INSTRUCTION 

.•STRIP AND SAVE THE ERROR ITEM CODE 
SEE IF THIS IS THE POWER FAIL CALL 
BRANCH AROUND ROUTINE IF IT IS 
SEE IF THIS IS THE 2ND ERROR CALL 
BRANCH IF SO 

MOVE CPU ERR REG TO CPSAVE FOR TEST 

SEE IF POWER MONITOR BIT IS SET 

BRANCH IF OK 

CLEAR THE BIT FOUND SET 

MAKE IBSAVE NON-ZERO FOR DUAL CALL 

SET $ITEMB TO SPECIAL POWER FAIL PNTR 

BRANCH OVER IBSAVE CLEARING 

CLEAR IBSAVE SO AFTER 2ND ERROR, EXIT 

SKIP TYPEOUT IF SET 

SKIP TYPEOUTS 

GO TO USER ERROR ROUTINE 



RUNNING IN APT MODE 

NO. SKIP APT ERROR REPORT 

SET ITEM NUMBER AS ERROR NUMBER 

REPORT FATAL ERROR TO APT 



.-DPMOOI 



0PMO01 
DPMOOI 
DPMOOI 
DPMOOI 
DPMOOI 
DPMOOI 
DPMOOI 
DPMOOI 
DPMOOI 
DPMOOI 
DPMOOI 
DPMOOI 
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003540 


000777 






22S: 


BR 


003542 


105737 


003646 




2$: 


TSTB 


003546 


001005 








BNE 


003550 


005777 


175364 






TST 


003554 


100002 








8PL 


003556 


000000 








HALT 


003560 


104410 








CKSUR 


003562 


032777 


001000 


175350 


3$: 


BIT 


003570 


001405 








BEQ 


003572 


10S737 


003646 






TSTB 


003576 


001256 








BNE 


003600 


013716 


001110 






MOV 


003604 


005737 


001212 




4$: 


TST 


003610 


001405 








BEQ 


003612 


105737 


003646 






TSTB 


003616 


001246 








BNE 


003620 


013716 


001212 






MOV 


003624 








5S: 




003624 


022737 


036252 


000042 




CMP 


003632 


001001 








BNE 


003634 


000000 








HALT 


003636 








6S: 




003636 


105737 


003646 






TSTB 


003642 


001234 








BNE 


003644 


000002 








RTI 


003646 


000000 






I8SAVE: 


.WORD 



C 4 
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SEQUENCE ^1 



22$ ;;APr ERROR LOOP 

IBSAVE .-SEE IF POWER FAIL ERROR CALL ;DPM001 

3S ; BRANCH IF NOT - HALT NOT ALLOWED .-DPHOOI 

aSUR ::HALT ON ERROR 

3$ ;;SKIP IF CONTINUE 

.-.-HALT ON ERROR. 

;;TEST FOR CHANGE IN SOFT-SUR 

#8IT09.asWR ;;LOOP ON ERROR SWITCH SET? 

4$ ;;BR IF NO 

IBSAVE ;SEE IF THIS IS THE PUR MNTR BIT ERROR ;DPM001 

7$ .-BRANCH BACK IF SO - FUDGING NOT ALLOWED; DPM001 

$LPERR.(SP) ; .-FUDGE RETURN FOR LOOPING 

SESCAPE ;; CHECK FOR AN ESCAPE ADDRESS 

5$ .-.-BR IF NONE 

IBSAVE ;SEE IF THIS IS THE PWR MNTR BIT ERROR ;DPM001 

7$ .-BRANCH BACK IF SO - FUDGING NOT ALLOWED;DPH001 

SESCAPE. (SP) .-.-FUDGE RETURN ADDRESS FOR ESCAPE 

#$ENDAD.a#42 ;;ACT-11 AUTO-ACCEPT? 
6S .-.-BRANCH IF NO 

;;YES 

IBSAVE .-SEE IF THIS IS THE PWR FAIL ERROR CALL ;DP«001 

7$ .-BRANCH BACK TO CALL ORIGINAL ERR IF SO .-DPMOOI 

- - RETURN 

0 -LOC'N TO HOLD SITEMB DURING DUAL ERR .-DPM001 
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1789 

1790 

1791 

1792 

1793 

1794 

1795 

1796 

1797 

1796 

1799 

1800 

1801 

1802 

1803 

1804 

1805 

1806 

1807 

1808 

1809 

1810 

1811 

1812 

1813 

1814 

1815 

1816 

1817 

1818 

1819 

1820 

1821 

1822 

1823 

1824 

1825 

1826 

1827 

1828 

1829 

1830 

1831 

1832 

1833 

1834 

1835 

1836 

1837 

1838 

1839 

1840 

1841 

1842 

1843 

1844 

1845 



003650 
003654 
003656 
003660 
003664 



104401 
010046 
005000 
153700 
001004 



003666 013746 



003672 
003674 
003676 
003702 
003704 
003710 
003712 
003714 
003716 
003720 
003722 
003726 
003732 
003734 
003736 
003740 
00374'. 
003750 
003752 
003754 
003756 
003762 
003764 
003766 
003770 
003772 
003774 

003776 
004000 
004002 

004004 

004010 
004012 
004014 
004016 

004020 
004024 
004026 
004030 
004032 

004034 
004040 
004042 
004044 
004050 



104402 
000530 
122700 
001003 
012700 
000406 
005300 
006300 
006300 
006300 
062700 
012037 
001404 
104401 
000000 
104401 
012037 
001404 
104401 
000000 
104401 
010146 
012001 
001472 
012000 
105710 
001003 

013146 
104402 
000456 

121027 
001003 
013146 
104405 
000450 

121027 
001003 
013146 
104406 
000442 

121027 
001011 
012146 
004737 
062716 



001221 
001114 
001116 

000177 
004172 



001320 
003736 



001221 
003754 



001221 



000001 



000002 



000003 



007066 
000003 



ERRTrP: TrPE 
MOV 
CLR 
81 SB 
BNE 

MOV 



1$: 

100$: 

110$: 

2$: 
3$: 

4$: 

5$: 

6$: 

.•♦THIS 



;»THIS 
H: 



;»THIS 
8$: 



;*THIS 
9$: 



TYPOC 
BR 

CMP8 

BNE 

MOV 

BR 

DEC 

ASL 

ASL 

ASL 

ADD 

MOV 

BEQ 

TYPE 

.WORD 

TYPE 

MOV 

BEQ 

TYPE 

.WORD 

TYPE 

MOV 

MOV 

BEQ 

MOV 

TST8 

BNE 

CODE IS 
MOV 
TYPOC 
BR 

CODE IS 
CMPB 
BNE 
MOV 

TYPDS 
BR 

CODE IS 

CMPB 

BNE 

MOV 

TYP8N 

BR 
CODE IS 

CMPB 

BNE 

MOV 

JSR 

ADD 



.$CRLF 

RO,-(<SP) 

RO 

a4r$ITEMB,R0 
1$ 

$ERRPC.-(SP) 



13$ 

#177. RO 
100$ 

*PFECUS.RO 

110$ 

RO 

RO 

RO 

RO 

f$ERRTB.RO 
(R0)*.2$ 
3$ 



SEQUENCE 42 



TYPE <CRLF> 
SAVE RO. 

PICKUP THE ITEM INDEX 

IF ITEM NUMBER IS ZERO. JUST 
TYPE THE PC OF THE ERROR 

SAVE $ERRPC FOR TYPEOUT 

ERROR ADDRESS 

60 TYPE— OCTAL ASCI I (ALL DIGITS) 
GET OUT 

SEE IF THIS ERROR CALL IS THE POWER MONITOR BIT CALL 
BRANCH IF NOT 

MOVE ADDRESS OF POWER MONITOR BIT ERROR TO RO 

BRANCH TO CALL THE ERROR 

ADJUST THE INDEX SO THAT IT WILL 

WORK FOR THE ERROR TABLE. 



.•FORM TABLE POINTER 
.•PICKUP "ERROR MESSAGE" POINTER 
.•SKIP TYPEOUT IF NO POINTER 
;TYPE THE "ERROR MESSAGE" 
0 .-"ERROR MESSAGE" POINTER GOES HERE 

.$CRLF ;"CARRIA6E RETURN" t "LINE FEED" 

(R0)*.4$ .-PICKUP "DATA HEADER" POINTER 

5$ .-SKIP TYPEOUT IF 0 

;TYPE THE "DATA HEADER" 
0 ;'T)ATA HEADER" POINTER GOES HERE 

,$CRLF ; "CARRIAGE RETURN" t "LINE FEED" 

R1 ~(KSP) 'SAVE R1 

(r6)+.R1 -pickup "DATA TABLE" POINTER 

12$ ;8R IF NO DATA TO BE TYPED 

(RO)*.RO .-PICKUP "DATA FORMAT" POINTER 

(RO) ;IS IT FORMAT 0? 

7$ :8R IF NO 

FOR OCTAL (16-BIT) FORMAT (DF=0) 
a(R1)*.-(SP) .-.-SAVE a(Rl)+ FPR TYPEOUT 

;;G0 TYPE— OCTAL ASCI HALL DIGITS) 

11$ 

FOR DECIMAL FOfiMAT (0F=1) 



(R0).#1 
8$ 

a(R1)+,-(SP) 
11$ 



IS IT FORMAT 1? 
BRANCH IF NO 
.-SAVE a(R1)* FOR TYPEOUT 
;G0 TYPE— DECIMAL ASCII WITH SIGN 



FOR BINARY FORMAT (DF=2) 



(R0).#2 
9$ 

a(R1)*,-(SP) 
11$ 



IS IT FORMAT 2 

BRANCH IF NO 

;SAVE aCRD* FOR TYPEOUT 

;60 TYPE— BINARY ASCII 



FOR OCTAL (22-8IT) FORMAT (DF=3) 



(R0).#3 
15$ 

(R1)+.-(KSP) 

PC.$DB20 

*3.(KSP) 



IS IT FORMAT 3? 
BRANCH IF NO 

PUT ADDRESS OF FIRST LOC. ON STACK 
CONVERT TWO LOCS. TO AN ASCII STRING 
ONLY NEED 8 CHARACTERS NOT 11 



iKHTBDO 
ERROR HANDLER 



1846 
18A7 
1848 
18A9 
1830 
1851 
1852 
1853 
1854 
1855 
1856 
1857 
1858 
1859 
1860 
1861 
1862 
1863 
1864 
1865 
1866 
1867 
1868 
1869 
1870 
1871 
1872 
1873 
1874 
1875 
1876 

1877 



1878 



1879 
1880 

1881 



004054 
004060 
004062 

004064 
004066 
004070 
004072 
004074 
004100 
004104 
004110 
004114 
004120 
004124 
004130 
004132 
004134 
004136 
004140 
004142 
004144 
004150 
004152 
004154 
004156 
004160 
004164 
004166 
004171 
004172 
004200 
004202 
004205 
00 '.210 
004213 
004216 
004221 
004224 
004227 
004232 
004235 
004240 
004242 
004245 
004250 
004253 
004256 
004261 
004264 
004267 

004272 
004300 
004302 
004305 



MEM nCMT 

ROUTINE 

012637 
104401 
000000 

010246 
010346 
013103 
005002 
073227 
010237 
010337 
012746 
004737 
062716 
012637 
104401 
000000 
012603 
012602 
005711 
001404 
104401 
105720 
000707 
012601 
012600 
104401 
000207 
040 
000 
004202 
004302 
120 
105 
115 
111 
122 
111 
127 
040 
125 
040 
124 
124 
124 
040 
122 
120 
040 
125 
122 

001230 
000000 
000 
000 
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SEQUENCE 4 3 



004062 



000006 
001206 
001210 
001206 
007066 
000003 
004132 



004166 



MOV 

TYPE 
lOS: .WORD 
;*THIS CODE IS 



15$: 



16$; 



11$: 



12$: 
13$: 



MOV 

nov 

MOV 

CLR 

ASHC 

MOV 

MOV 

MOV 

JSR 

ADD 

MOV 

TYPE 

.WORD 

MOV 

MOV 

TST 

BEQ 

TYPE 

TST8 

BR 

MOV 

MOV 



001221 






TYPE 








RTS 


040 


000 


14$: 


.ASCIZ 








.BYTE 


004242 


004272 


PFECUS: 


.WORD 


117 


127 


PFECEH: 


.ASCIZ 


122 


040 






117 


116 






124 


117 






040 


102 






124 


040 






101 


123 






106 


117 






116 


104 






123 


105 






000 








105 


123 


PFECDH: 


.ASCJZ 


116 


117 






040 


105 






122 


040 






103 


040 






103 


120 






105 


122 






000 














.EVEN 


001116 


003266 


PFECDT: 


.WORD 


000 


000 


PFECDF: 


.BYTE 



(KSP)*. 10$ 



:PUr ADDRESS OF ASCII CHARS. AT 10$ 
.-TYPE OCTAL VALUE OF 22-8IT BINARY NO. 



FOR OCTAL (22-BIT) FORMAT FOR A PAR LEFT SHIFTED 6 (DF=4) 



R2.-(KSP) 
R3.-(KSP) 
a(R1)*,R3 
R2 

#6.R2 

R2.$TMP4 

R3.$TMP5 

#$TMP4,-(KSP) 

PC.$D820 

#3,(KSP) 

(KSP)*J6$ 



SAVE R2 ON STACK 
SAVE R3 ON STACK 
LOAD DATA WORD INTO R3 
R2 HOLDS UPPER SIX BITS OF NUMBER 
SHIFT VALUE LEFT 6 TIMES 
HOLDS LOWER 16 BITS OF ADDRESS 
HOLDS UPPER 6 BITS OF ADDRESS 
PUT ADDRESS OF LOWER BITS ONTO STACK 
CONVERT TWO LOCS. TO AN ASCII STRING 
ONLY NEED 8 CHARACTERS NOT 11 
PUT ADDRESS OF ASCII CHARS. AT 16$ 
TYPE OCTAL VALUE OF 22-BIT BINARY NO. 



(KSP)+,R3 
(KSP)*,R2 
(R1) 
12$ 
.14$ 
(R0) + 
6$ 

(KSP)+.R1 
(KSP)+,RO 
,$CRLF 
PC 

/ / 
0 

PFECEM, PFECDH, PFECDT, PFECDF 



RESTORE R3 
RESTORE R2 

IS THERE ANOTHER NUMBER? 
BR IF NO 

TYPE TWOvt) SPACES 
POINT TO NEW "DATA FORMAT" 

LOOP 

RESTORE R1 
RESTORE RO 

"CARRIAGE RETURN" t "LINE FEED' 
RETURN 

TWO (2) SPACES 



$TESTN,$ERRPC,CPSAVE,0 
0,0,0,0 
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SEQUENCE 44 



S8TTL TTr INPUT ROUTINE 
ENABL LSB 



004306 


022737 


0001 76 


001140 


$CKSWR: 


CW> 


#SUREG,SUR 


004314 


001114 








BNE 


15$ 


004316 


105777 


1 74622 






TSTB 


a$TKS 


004322 


100111 








BPL 


15$ 


004324 


117746 


174616 






novB 


9$TKB,-(SP) 
#*C177.(SP) 


004330 


042716 


1 77600 






BIC 


004334 


022726 


000007 






CMP 


*7,(SP)* 


004340 


001102 








BNE 


15$ 


004342 


123727 


001134 


000001 




CMPB 


$AUT0B.#1 


004350 


001476 








6E0 


15$ 


0043S2 


104401 


005253 






TYPE 


,$CNTLG 


004356 


104401 


005260 




SGTSUR: 


TYPE 


,$MSWR 


004362 


013746 


000176 






MOV 


SWREG,-(SP) 


004366 


104402 








TYPOC 


,$MNEU 


004370 


104401 


005271 






TYPE 


004374 


005046 






19$: 


CLR 


-(SP) 


004376 


005046 








CLR 


-(SP) 


004400 


105777 


174540 




7$: 


TSTB 


a$TKS 


004404 


100375 








BPL 


7$ 


004406 


117746 


174534 






MOVB 


a$TKfl,-(SP) 
/r*Cl77.(SP) 
(SP).*3 


004412 


042716 


1 77600 






BIC 


004416 


021627 


000003 






CMP 


004422 


001015 








BNE 


9$ 


004424 


104401 


001312 






TYPE 


,$CNTLC 


004430 


062706 


000006 






ADD 


#6.SP 


004434 


123727 


001135 


000001 




CMP8 


$JNTAG,*1 


004442 


001003 








BNE 


8$ 


004444 


012777 


000100 


174472 




MOV 


#ioo,a$TKs 


004452 


000137 


005302 




8S: 


JMP 


CNTRLC 


004456 


021627 


000025 




9$: 


CMP 


(SP),*25 


004462 


001005 








BNE 


10$ 


004464 


104401 


005246 






TYPE 


.$CNTLU 


004470 


062706 


000006 




20$: 


ADD 


#6.SP 


004474 


000737 








BR 


19$ 


004476 


021627 


000015 




10$: 


CMP 


(SPJ. #15 


004502 


001022 








BNE 


16$ 


004504 


005766 


000004 






TST 


4(SP) 


004510 


001403 








BEO 


11$ 


004512 


016677 


000002 


174420 




MOV 


2(SP).aSWR 


004520 


062706 


000006 




11$: 


ADD 
TYPE 


#6,SP 


004524 


104401 


001221 




14$: 


.$CRLF 


004530 


123727 


001135 


000001 




CMP8 


$INTAG,#1 


004536 


001003 








BNE 


15$ 


004540 


012777 


000100 


174376 




MOV 


#100.a$TICS 


004546 


000002 






15$: 


RTI 




004550 


004737 


005644 




16$: 


JSR 


PC.$TYPEC 


004554 


021627 


000060 






CMP 


(SP).*60 


004560 


002420 








BLT 


18$ 


004562 


021627 


000067 






CMP 


(SP).»67 



^SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 
•ROUTINE IS ENTERED FROM THE TRAP HANDLER, AND UILL 
•SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
•WHEN OPERATING IN TTY FLAG MODE. 

" ;;IS THE SOFT-SWR SELECTED? 

; .-BRANCH IF NO 
;;CHAR THERE? 

;;IF NO, DON' F WAIT AROUND 
;;SAVE THE CHAR 
;;STRIP-OFF THE ASCII 
;;IS IT A CONTROL G? 
;;N0. RETURN TO USER 
;;ARE WE RUNNING IN AJTO-MODE? 
; .-BRANCH IF YES 
.-.-ECHO THE CONTROL-6 (*G) 
.-.-TYPE CURRENT CONTENTS 
;;SAVE SWREG FOR TYPEOUT 
;;G0 TYPE— OCTAL ASCII (ALL DIGITS) 

PROMPT FOR NEW SWR 
.-.-CLEAR COUNTER 
:;THE NEW SWR 
;;CHAR THERE? 
;;IF NOT TRY AGAIN 
.-.-PICK UP CHAR 
.-.-MAKE IT 7-BIT ASCII 
;;IS IT A CONTROL-C? 
.-.-BRANCH IF NOT 
;.-YES. ECHO CONTROL-C (*C) 
;; CLEAN UP STACK 

;;REENA8LE TTY KEYBOARD INTERRUPTS? 
.-.BRANCH IF NO 

; .-ALLOW TTY KEYBOARD INTERRUPTS 
;; CONTROL-C RESTART 
;;IS IT A CONTROL -U? 
.-.BRANCH IF NOT 
.-.-YES. ECHO CONTROL-U (*U) 
;; IGNORE PREVIOUS INPUT 
.-.LET'S TRY IT AGAIN 
;;IS IT A <CR>? 
.-.-BRANCH IF NO 
;;YES. IS IT THE FIRST CHAR? 
.-.-BRANCH IF YES 
.-.-SAVE NEW SWR 
.-.-CLEAR UP STACK 
.-.-ECHO <CR> AND <LF> 
;;RE-ENABLE TTY KBD INTERRUPTS? 
;; BRANCH IF NOT 

;;RE-ENA8LE TTY KBD INTERRUPTS 
.-.-RETURN 
.-.-ECHO CHAR 
.-.-CHAR < 0? 
.-.-BRANCH IF YES 
;;CHAR > 7? 
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SEQUENCE 



004566 
004570 
004574 
004600 
004602 
004604 
004606 
004610 
004614 
004620 
004622 
004626 



003015 
042726 
005766 
001403 
006316 
006316 
006316 
005266 
056616 
000667 
104401 
000720 



000060 
000002 



000002 
177776 

001220 



B6T 
BIC 
TST 
BEO 
ASL 
ASL 
ASL 

17$: INC 
BIS 
BR 

18$: TYPE 
BR 

DSA8L LSB 

* ************* 

iTHIS ROUTINE 
*CALL : 

* RDCHR 

* RETURN HERE 
* 



18$ 

#60, (SP)* 
2(SP) 
17$ 

(SP) 
(SP) 
(SP) 
2(SP) 
-2(SP) 
7$ 

-$OUES 
^0$ 

************ 

WILL INPUT A 



(SP) 



BRANCH IF YES 

STRIP-OFF ASCII 

IS THIS THE FIRST CHAR 

BRANCH IF YES 

NO, SHIFT PRESENT 
CHAA OVER TO MAKE 
ROOn FOR NEW ONE. 

KEEP COUNT OF CHAR 

SET IN NEW CHAR 

GET THE NEXT ONE 

TYPE ?<CR><LF> 

SIMULATE CONTROL-U 



************************************** 

SINGLE CHARACTER FROM THE TTY 



INPUT A SINGLE CHARACTER FROM THE TTY 
CHARACTER IS ON THE STACK 
WITH PARITY BIT STRIPPED OFF 



004630 


011646 






$RDCHR: 


MOV 


(SP).-(SP) 
4(SP).2(SP) 


;PUSH DOWN THE PC 


004632 


016666 


000004 


000002 




MOV 


;SAVE THE PS 


004640 


105777 


174300 




U: 


TSTB 


a$TKS 


;WAIT FOR 


004644 


100375 








BPL 


1$ 


;A CHARACTER 


004646 


1 1 7766 


174274 


000004 




MOVB 


a$TKB.4(SP) 


.•READ THE TTY 


004654 


042766 


177600 


000004 




BIC 


#»C<177>.4(SP) ; 


;6ET RID OF JUNK IF ANY 


004662 


026627 


000004 


000023 




CMP 


4(SP).#23 


;IS IT A CONTROL-S? 


004670 


001013 








6NE 


3$ 


.•BRANCH IF NO 


004672 


105777 


1 74246 




2$: 


TSTB 


a$TKS : 


.•WAIT FOR A CHARACTER 


004676 


100375 








BPL 


2$ 


.•LOOP UNTIL ITS THERE 


004700 


117746 


174242 






MOVB 


a$TKB,-(SP) 
#*C177,(SP) 


.•GET CHARACTER 


004704 


042716 


177600 






BIC 


.•MAKE IT 7-eiT ASCII 


004710 


022627 


000021 






CMP 


(SP)*.#21 


;IS IT A CONTROL -Q? 


004714 


001366 








BNE 


2$ 


;IF NOT DISCARD IT 


004716 


000750 








BR 


1$ 


;YES. RESUME 


004720 


026627 


000004 


000021 


3$: 


CMP 


4(SP).#$X0N 


:IS IT A RANDOM XON? 


004726 


001744 








6EQ 


1$ 


.BRANCH IF YES 


004730 


026627 


000004 


000140 




CMP 


4 (SP) .#140 


;IS IT UPPER CASE? 


004736 


002407 








BLT 


4$ 


.•BRANCH IF YES 


004740 


026627 


000004 


000175 




CMP 


4(SP).#175 


;IS IT A SPECIAL CHAR? 


004746 


003003 








BGT 


4$ 


.•BRANCH IF YES 


004750 


042766 


000040 


000004 




BIC 


#40,4(SP) 


;MAKE IT UPPER CASE 


004756 


000002 






4$: 


RTI 


;60 BACK TO USER 



.-RANOOl 
.•RANOOl 



004760 010346 

004762 005046 

004764 012703 005236 

004770 022703 005246 

004774 101467 

004776 104411 

005000 112613 

005002 122713 000003 



■ •*** 

iTHIS 

•CALL 

* 

* 

* 

$RDLIN 

1$: 
2$: 



**•***********•***********•**********•***< 

ROUTINE WILL INPUT A STRING FROM THE TTY 



RDLIN 

RETURN HERE 

MOV R3.-(SP) 

CLR -(SP) 

MOV #$TTYIN.R3 

CMP #$TTYIN*8..R3 

BLOS 4$ 

RDCHR 

MOVB (SP)+-(R3) 

CHP8 #3. (R3) 



INPUT A STRING FROM THE TTY 

ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
TERMINATOR WILL BE A BYTE OF ALL O'S 
SAVE R3 

CLEAR THE RU80UT KEY 
GET ADDRESS 
BUFFER FULL? 
BR IF YES 

GO READ ONE CHARACTER FROM THE TTY 

GET CHARACTER 

IS IT A CONTROL-C? 
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005006 


001006 








BNE 


lOS 


005010 


104401 


001312 






TYPE 


.SCNTLC 


0050U 


005726 








TST 


(SP)* 


005016 


012603 








MOV 


(SP)+.ft3 


005020 


000137 


005302 






JMP 


CNTRLC 


005024 


122713 


000177 




10$: 


CMPB 


#177, (R3) 


005030 


001022 








BNE 


5$ 


005032 


005716 








TST 


(SP) 


005034 


001007 








BNE 


6S 

*'\,9$ 


005036 


112737 


000134 


005234 




MOVB 


005044 


104401 


005234 






TYPE 


.9$ 


005050 


012716 


M7777 






MOV 


*-1,(SP) 


005054 


005303 






6S: 


DEC 


R3 


005056 


020327 


005236 






CMP 


R3.*$TTYIN 


005062 


103434 








BLO 


4$ 


005064 


111337 


005234 






MOVB 


(R3),9$ 


005070 


104401 


005234 






T>PE 




005074 


000735 








BR 


^$ 


005076 


005716 






5S: 


TST 


(SP) 


005100 


001406 








BEO 


7S 


005102 


112737 


000134 


005234 




MOVB 


#'\.9S 


005110 


104401 


005234 






TYPE 


.9$ 


005114 


005016 








CLR 


(SP) 


005116 


122713 


000025 




7$: 


CMPB 


#25. (R3) 


005122 


001003 








BNE 


as 


005124 


104401 


005246 






TYPE 


.SCNTLU 


005130 


00071 5 








BR 


IS 


005132 


122713 


000022 




8$: 


CMPB 


#22. (R3) 


005136 


001011 








BNE 


3S 


005140 


105013 








CLRB 


(R3) 


005142 


104401 


001221 






TYPE 


.SCRLF 


005146 


104401 


005236 






TYPE 


.STTYIN 
^S 


005152 


000706 








BR 


005154 


104401 


001220 




4S: 


TYPE 


.SQUES 


005160 


000701 








BR 


IS 


005162 


111337 


005234 




3$: 


MOVB 


(R3).9S 


005166 


104401 


005234 






TYPE 


.9S 


005172 


122723 


000015 






cnPB 


#15, (R3)* 


005176 


001274 








BNE 


2S 


005200 


105063 


y77777 






CLRB 


-1 (R3) 


005204 


104401 








TYPE 


.SLF 


005210 


005726 








TST 


(SP)* 


005212 


012603 








MOV 


(SP)+.R3 


005214 


011646 








MOV 


(SP)--(SP) 


005216 


016666 


000004 


000002 




MOV 


4(SP>,2(SP) 


005224 


012766 


005236 


000004 




MOV 


#$TTyiN,4(SP) 


005232 


000002 








RTI 




005234 


000 






9$: 


• BYTE 


0 


005235 


000 








.BYTE 


0 


005236 








STTYIN: 


.BLKB 


8. 


005246 


136 


125 


015 


SCNTLU: 


.ASCIZ 


/•U/<15><12> 


005251 


012 


000 










005253 


136 


107 


015 


fCNTLG: 


.ASCIZ 


/•G/<15><12> 


005256 


012 


000 










005260 


015 


012 


123 


SMSUR: 


.ASCIZ 


<15><12>/SWR 


005263 


127 


122 


040 








005266 


075 


040 


000 









L 



SEQUENCE 46 



BRANCH IF NO 

TYPE A CONTROL-C CO 

CLEAN RUBOUT KEY OFF OF THE STACK 

RESTORE R3 

GOTO CONTROL-C RESTART 
IS IT A RUBOUT 
BR I F NO 

IS THIS THE FIRST RUBOUT? 
BR IF NO 

TYPE A BACK SLASH 

SET THE RUBOUT KEY 
BACKUP BY ONE 
STACK EMPTY? 
BR IF YES 

SETUP TO TYPEOUT THE DELETED CHAR. 
GO TYPE 

GO READ ANOTHER CHAR. 
: RUBOUT KEY SET? 
;BR IF NO 

iTYPE A BACK SLASH 

; CLEAR THE RUBOUT KEY 
;IS CHARACTER A CTRL U? 
;BR IF NO 

;TYPE A CONTROL 'M" 

:60 STA«T OVER 

;IS CHARACTER A "•R"? 

iBRANCH IF NO 

; CLEAR THE CHARACTER 

;TYPE A "CR" & 'IF" 

;TYPE THE INPUT STRING 

rGO PICKUP ANOTHER CHACTER 

;TYPE A •?• 

; CLEAR THE BUFFER AND LOOP 
;ECHO THE CHARACTER 

; CHECK FOR RETURN 

;LOOP IF NOT RETURN 

r CLEAR RETURN (THE 15) 

;TYPE A LINE FEED 

; CLEAN RUBOUT KEY FROM THE STACK 

^RESTORE R3 

^ADJUST THE STACK AND PUT ADDRESS OF THE 
; FIRST ASCII CHARACTER ON IT 

; RE TURN 

.STORAGE FOR ASCII CHAR. TO TYPE 
; TERMINATOR 

; RESERVE 8 BYTES FOR TTY INPUT 
: CONTROL 'V 

; CONTROL "G" 



/ 
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003271 040 040 116 SMNEW: .ASCIZ / NEW 

005274 105 127 040 
005277 075 040 000 
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SEQUENCE 4S 



188A 

1885 

^886 005302 

1887 005310 

1888 0053U 

1889 005320 

1890 005326 

1891 005332 

1892 005334 

1893 005340 

1894 005344 

1895 005346 

1896 005350 

1897 005354 

1898 005356 

1899 005361 
005364 
005367 
005372 
005375 
005400 
005403 
005406 

1900 005411 
005414 
005417 
005422 
005425 
005430 

1901 



013737 
005237 
104401 
113737 
013746 
104402 
104401 
013746 
104405 
104407 
000137 
000000 
040 
112 
120 
107 
117 
116 
117 
120 
123 
124 
124 
Oil 
123 
117 
000 



001232 
001210 
005361 
001102 
005354 

005356 
001210 



.S8TTL 
001210 CNTRLC: 

005354 



036026 




1$: 


040 


000 


2S: 


125 


115 


CMSG: 


111 


116 




040 


124 




040 


105 




104 


040 




106 


040 




101 


123 




015 


012 




105 


123 




116 


117 




120 


101 




123 


116 




015 


012 





CONTROL-C SERVICING ROUTINE 



MOV 

INC 

TYPE 

MOVB 

MOV 

TYPOC 

TYPE 

MOV 

TYPDS 

GTSUR 

JMP 

.WORD 

.ASCIZ 

.ASCII 



$PASS.$TMP5 

$TMP5 

,CMSG 

$TSTNM.1$ 

1$,-(SP) 

$TMP5,-(SP) 



$E0P+2 

0 

/ / 



GET THE VALUE OF "SPASS" 
FORM CURRENT PASS # 
TYPE THE TEST STOPS HERE 
SAVE TEST NUMBER 
SAVE 1$ FO TYPEOUT 



SAVE STMP5 FOR TYPEOUT 
TYPE ASCII DECIMAL WITH SIGN 
ASK FOR NEW SWR VALUE 
JUMP TO END OF PASS ♦ 2 
TEST * BUFFER 
2 SPACES t STOP MESSAGE 



/JUMPING TO END OF PASS/<15><12> 



.ASCIZ /TESTNO PASSNO/<15><12> 



.EVEN 
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S8TTL TYPE ROUTINE 



SEQUENCE 



•ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 BYTE, 
*THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 



*N0TE1 
*N0TE2 
•N0TE3 



•CALL: 
*1) USING A 

• TYPE 
•OR 

• TYPE 

• MESADR 



SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 



TRAP INSTRUCTION 
.MESADR 



; .-MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 



005432 


105737 


001157 




STYPE: 


TSTB 


$TPFL6 


;IS THERE A TERMINAL? 


005436 


100002 








BPL 


1$ 


;BR IF YES 


005440 


000000 








HALT 




'.-HALT HERE IF NO TERMINAL 


005442 


000430 








BR 


3$ 


•.•LEAVE 


005444 


010046 






1$: 


MOV 


RO.-(SP) 


■;SAVE RO 


005446 


01 7600 


000002 






MOV 


a2(SP),R0 


'.-GET ADDRESS OF ASCIZ STRING 


005452 


122737 


000001 


001244 




CMP8 


*APTENV,$ENV 


; .-RUNNING IN APT MODE 


005460 


001011 








BNE 


62$ 


•;N0,60 CHECK FOR APT CONSOLE 


005462 


132737 


000100 


001245 




BITB 


*APTSPOOL.$ENVM 


;; SPOOL MESSAGE TO APT 


005470 


001405 








BEQ 


62$ 


•;NO.GO CHECK FOR CONSOLE 


005472 


010037 


005502 






MOV 


R0.61$ 


; .-SETUP MESSAGE ADDRESS FOR APT 


005476 


004737 


006004 






JSR 


PC.$ATY3 


SPOOL MESSAGE TO APT 


005502 


000000 






61$: 


.WORD 


0 


; .-MESSAGE ADDRESS 


005504 


132737 


000040 


001245 


62$: 


BITB 


*APTCSUP,$ENVM 


;;APT CONSOLE SUPPRESSED 


005512 


001003 








BNE 


60$ 


YES, SKIP TYPE OUT 


005514 


112046 






2$: 


MOVB 


(RO)*,-(SP) 


;;PUSH CHARACTER TO BE TYPED ONTO STACK 
;.-8R IF IT ISN'T THE TERMINATOR 


005516 


001005 








BNE 


4$ 


005520 


005726 








TST 


(SP) + 


;;IF TERMINATOR POP IT OFF THE STACK 


005522 


012600 






60$: 


MOV 


(SP)+, RO 


; .-RESTORE RO 


005524 


062716 


000002 




3$: 


ADD 


#2,(SP) 


; .-ADJUST RETURN PC 


005530 


000002 








RTI 


; .RETURN 


005532 


122716 


000011 




4$: 


CMP8 


MHT, (SP; 


;; BRANCH Ir <HI> 


005536 


001430 








BEQ 


8$ 




005540 


122716 


000200 






CMPB 


*CRLf .(SP) 


;;BRANCH IF NOT <CRLF> 


005544 


001006 








BNE 


5$ 




005546 


005726 








TST 


(SP)* 


r;POP <CR><LF> EQUIV 


005550 


104401 








TYPE 




;;TYPE A CR AND LF 


005552 


00V21 








SCRLF 






005554 


105037 


005772 






CLRB 


$CHARCNT 


CLEAR CHARACTER COUNT 


005560 


000755 








BR 


2$ 


;;GET NEXT CHARACTER 


005562 


004737 


005644 




5$: 


JSR 


PC.STYPEC 


;;G0 TYPE THIS CHARACTER 


005566 


123726 


001156 




6$: 


CMPB 


SFILLC. (SP)* 


;;IS IT TIME FOR FILLER CHARS.? 


005572 


001350 








BNE 


2$ 


;;IF NO GO GET NEXT CHAR. 


005574 


013746 


001154 






MOV 


SNULL. -(SP) 


;;GET » OF FILLER CHARS. NEEDED 














;.-AND THE NULL CHAR. 


005600 


105366 


000001 




7$: 


DECS 


KSP) 


;;DOES A NULL NEED TO BE TYPED? 


005604 


002770 








BLT 


6$ 


;;BR IF NO— 60 POP THE NULL OFF OF STACK 


005606 


004737 


005644 






JSR 


PC.$TYPEC 


;;60 TYPE A NULL 


005612 


105337 


005772 






DECB 


SCHARCNT 


;;D0 NOT COUNT AS A COUNT 


005616 


000770 








BR 


7$ 


;;LOOP 










.•HORIZONTAL TAB 


PROCESSOR 
»' .(SP) 




005620 


112716 


000040 




8$: 


MOVB 


.-.-REPLACE TAB WITH SPACE 
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W JUC " 


004737 


005644 




9$: 


JSR 


PC,$TYPEC 


W JO 


132757 


000007 


005772 




BITS 


#7,$CHARCNT 


W JO 


001 37? 








BNE 


9$ 




W J f CKJ 








TST 


ISP)* 


005642 


000724 








BR 


2$ 










STYPEC: 




a$TKS 


005644 


105777 


173274 






TST8 


005650 


100022 








BPL 


10$ 


00565? 

J\J 


017746 


173270 






MOV 


a$TK6,-(SP) 
#177600, (SP) 


\J\J Jw J\J 


042716 


177600 






81 C 


00566? 


122716 

ICC' I w 


000023 






CMP6 


#$XOFF,(SP) 


005666 


001012 








BNE 


102$ 


005670 








101$: 




a$TKS 


005670 


105777 


173250 






TST8 


005674 


100375 








BPL 


101$ 


005676 


117716 


173244 






MOVB 


a$T»<8t(SP) 
#1 77600, (SP) 


005702 


042716 


177600 






BIC 


005706 


122716 


000021 






CMPB 


#$X0N,(SP} 


005712 


001366 








BNE 


101$ 


005714 








102$: 






005714 


005726 






10$: 


TST 


(SP)* 


005716 










a$TPS 


005716 


105777 


173226 






TST8 


005722 


100375 








BPL 


10$ 


005724 


126627 


000002 


000021 




CMP8 


2(SP),#$X0N 


005732 


001420 








BEQ 


$TYPEX 


005734 


116677 


000002 


173210 




M0V8 


2(SP). a$TP8 


005742 


122766 


000015 


000002 




CMP8 


#CR,2(SP) 


005750 


001003 








BNE 


1$ 


005752 


105037 


005772 






CLR8 


$CHAfiCNT 


005756 


000406 








BR 


$TYPEX 


005760 


122766 


000012 


000002 


1$: 


CMPB 


#LF,2(SP) 


005766 


001402 








BEO 


$TYPEX 


005770 


105227 








INC6 


(PC)* 


005772 


000000 






$CHARCNT:.U0RD 


0 


005774 


000207 






$rYPEX: 


RTS 


PC 



SEQUENCE 50 



.-.-TYPE A SPACE 

; .-BRANCH IF NOT AT 

;;TA8 STOP 

;;POP SPACE OFF STACK 
;;6ET NEXT CHARACTER 

;;CHAR IN KVBD BUFFER? 
;;8R IF NOT 
;;GET CHAR 

;; STRIP EXTRANEOUS BITS 
::UAS CHAR XOFF 
:;8R IF NOT 

;;UAIT FOR CHAR 

;;GET CHAR 
; .-STRIP IT 
;;UAS IT XON? 
;;8R IF NOT 

;;FIX STACK 

.-.-WAIT UNTIL PRINTER IS READY 

;;IS CHARACTER A RANDOM XON? 
.-.-BRANCH IF YES 

.-.-LOAD CHAR TO BE TYPED INTO DATA REG. 
.-.-IS CHARACTER A CARRIAGE RETURN? 
;; BRANCH IF NO 

;; YES—CLEAR CHARACTER COUNT 
.-.-EXIT 

;;IS CHARACTER A LINE FEED? 

; .-BRANCH IF YES 

.-.-COUNT THE CHARACTER 

; .-CHARACTER COUNT STORAGE 



:MJD001 
.-MJDOOl 
;MJD001 
.-MJDOOl 
; MJDOOl 
.-MJDOOl 
.-MJDOOl 
.-MJDOOl 
.-MJDOOl 
; MJDOOl 
.-MJDOOl 
.-MJDOOl 
.-MJDOOl 
.-MJDOOl 
.-MJDOOl 
.-MJDOOl 

.-MJDOOl 
.-RAN001 
.-RAN001 
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.S8TTL APT COmUNICATIONS ROUTINE 



UU J f fO 


1 1 57X7 
1 1 C ' J' 


UuuUU 1 




•A 1 T 1 . 


nuvts 


*1, SFFLG ;;T0 REPORT FATAL ERROR 


UUoUU** 




UUUUUl 




CATvX • 

»A 1 T J : 


nuvo 


#1.$«FL6 :;T0 TYPE A MESSAGE 


UUOU 1 c 


UUUhU J 








DO 


SATYC 




UUOU 1 H 


115777 






CATV/, • 


nuvo 


#1, SFFLG ;;T0 ONLY REPORT FATAL ERROR 


UUOUcc 








CATVr • 

»A 1 T I : 






ftl (\t\LA. 








now 


RO,-(SP) 


■PUSH RO ON STACK 




m ni Z.A 

U 1 U 1 '•0 








nwV 


R1,-(SP) 


'PUSH Rl ON STACK 


UwOUcO 


10^777 

1 U5 f J f 


UUOchU 






TCTB 

1 O 1 o 


SMFLG 


■SHOULD TYPE A MESSAGE' 




uu 1 H JU 








DCS 


5S 


•IF NOT: BR 




1 5P777 
1 cc f Jf 




om 5AA 
uu 1 c*»«» 




rMDB 

inrtj 


4rAPTENV,SENV 


■OPERATING UNDER APT? 


UUOU**c 


nni 071 

uu 1 U J 1 








Que 

one 


3S ; 


•IF NOT: BR 


UUDU**** 


1 7P777 

1 JC f Jf 


UUU 1 uu 


W 1 CH J 




Oi ID 


#APTSPOOL,SENVM ; 


•SHOULD SPOOL MESSAGES' 


UUDUDc 


nm A5S 

uu 1 J 








ocw 




•IF NOT: BR 




01 7600 

U 1 ' UUU 


00000^ 
uuuuu** 






nuv 


a4(SP).R0 ; 


•GET MESSAGE ADDR. 




065766 

UDC ' OO 


00000? 


00000^ 




Ann 


#2,4(SP) 


;;6UMP RETURN ADDR. 


V/UOvUO 


00 •(7^7 

uu J r J f 


001 55i 
UU 1 c cH 




1 c • 


TCT 


SMSGTYPE 


•SEE IF DONE W/ LAST XMISSION? 


UUOU* c 


001 X7*; 

uu 1 J r J 












•IF NOT: WAIT 


UUOU* 


0100x7 

u 1 uu J ' 


001 5A0 

UU 1 ctU 








RO-SMSGAD 


•PUT ADDR IN MAILBOX 


UUO 1 uu 


10S7P0 

1 U J r cU 






?t • 


TCTP 


(RO)* 


•FIND END OF MESSAGE 


UUO < Uc 


001 X76 

uu 1 J f o 








BMP 

one 


2S 


UUO 1 UH 


16^700 

1 O^ r UU 


001?iO 
uu 1 cH u 






CI IR 


SMS6AD,R0 


;SUe START OF MESSAGE 


noAi 10 

UUO 1 I u 


006P00 
uuocuu 








ACQ 


RO 


;GET MESSAGE LNGTH IN WORDS 


UUO 1 1 c 


0100X7 

U 1 UUj f 


001 5A5 

uu 1 cHt 






nuv 


RO.SMSGLGT 


;PUT LENGTH IN MAILBOX 


00A1 1 A 


01?7^7 

U 1 C ' J r 


00000^ 


001??^ 

uu 1 CCH 




nuv 


#4. SMSGTYPE 


;TELL APT TO TAKE MSG. 


0061 ?4 


0004 1 ^ 








On 


5S 




UUO 1 CO 


01 76^7 

U 1 f %JJ f 


00000^ 


0061 S? 

UUD 1 J C 




MDU 

nuv 


a4(SP).4$ ;:PUT MSG ADDP IN JSR LINKAGE 


00A1 "KL 

UUO 1 


uoc ' oo 


00000? 


OOOOOA 




Ann 


#2,4(SP) 


••BUMP RETURN ADDRESS 


UVO 1 He 


01 ^7^6 


177776 






nuv 


y77776,'{S?) ;;PUSH 177776 ON STACK 


00A14A 


0047^7 


00543? 

uu JH^C 






1 

J Or\ 


PC.STYPE ;;CALL TYPE MACRO 


UUO 1 JC 










unQn 
• wuni; 


0 




UUO 1 JH 








J9 * 








V/UO 1 


10S7^7 

1 U J r J r 


006?4? 

UUOtHc 




104* 


TCTR 

1 O 1 o 


SFFLG ; 


; SHOULD REPORT FATAL ERROR? 


006160 

UUO 1 ou 


001416 








ocw 


12s 


;IF NOT: BR 


00616? 


00S7^7 


001?^^ 






TCI 


SENV 


;RUNNING UNDER APT? 


006166 
UUO I 


00141 ^ 

UU 1 1 J 








OCW 


12s 


•IF NOT: BR 


006170 

UUO 1 f u 


00S757 

UUJ t Jf 


uu 1 CCH 




1 1 1 • 

t 1 9 • 


TCT 

1 d 1 


SMSGTYPE 


;FINISHED LAST MESSAGE? 


0061 74 

UUO 1 ' 


001375 

UU \ Jf J 








one 


11$ 


•IF NOT: WAIT 


0061 76 

UUO 1 t o 


017637 

U 1 t O J r 




001 ??6 
uu 1 ceo 




MOU 

nuv 


a4(SP).$FATAL ; 


;GET ERROR » 


006P04 

UUOt u*» 


UOC r OO 


UUUUUc 


00000^ 

UUUUUH 




Ann 


#2.4(SP) 


;;BUMP RETURN ADDR. 


UUOC 1 c 


\J\J JC J f 


uu 1 t t H 






f Mr 


SMSGTYPE 


•TELL APT TO TAKE ERROR 


UUOC 1 o 


1 \jj\jj f 


UUOc*f c 




1 ?t • 

1 C9 • 


n QR 

LLnO 


SFFLG 


•CLEAR FATAL FLAG 


006222 


105037 


006241 






CLR8 


$LFLG 


•CLEAR LOG FLAG 


006226 


105037 


006240 






CLRB 


SMFLG 


■CLEAR MESSAGE FLAG 


006232 


012601 








MOV 


(SP)+,R1 


•POP STACK INTO Rl 


006234 


012600 








MOV 


(SP) ♦.RO 


■POP STACK INTO RO 


006236 


000207 








RTS 


PC 


■RETURN 


006240 


000 






$MFL6: 


.BYTE 


0 


■MESS6. FLAG 


006241 


000 






$LFL6: 


.BYTE 


0 


■LOG FLAG 


006242 


000 






SFFLG: 


.BYTE 
.EVEN 


0 


•FATAL FLAG 



000200 
000001 
000100 
000040 



APTSI2E=200 
APTENV=001 
APTSPOOL=100 
APTCSUP=040 
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S8TTL BINARY 
************ 

ilHlS ROUTINE 
•BINARY-ASCII 
•CALL 



TO ASCII AND TYPE ROUTINE 
**** *****•••*•****• *******************ft***»f *•*•••• 

IS USED TO CHANGE 
NUMBER AND TYPE I 



A 16-BIT BINARY NUMBER TO A 16-BIT 













MOV 


NUMBER. -(SP) 


;; NUMBER TO BE TYPED 










• • 


TYPBN 




;;TYPE IT 


006244 


010146 






STYPSN: 


MOV 


R1,-(SP) 
6(SP).R1 


;:SAVE R1 ON THE STACK 


006246 


016601 


000006 






MOV 


;;GET THE INPUT NUMBER 


006252 


000261 








SEC 




;;SET "C" SO CAN KEEP TRACK OF THE NUMBER OF BITS 
;;SET CHARACTER TO AN ASCII "0". 


006254 


112737 


000060 


006316 


1$: 


MOVB 


#'0.$BIN 


006262 


006101 








ROL 


R1 


;;GET THIS BIT 


006264 


001406 








BEQ 


2$ 


;;DONE? 


006266 


105537 


006316 






ADCB 


SBIN 


;;N0— SET THE CHARACTER EQUAL TO THIS BIT 


006272 


104401 


006316 






TYPE 


.$8IN 


;;G0 TYPE THIS BIT 

;; CLEAR "C" SO CAN KEEP TRACK OF BITS 


006276 


000241 








CLC 




006300 


000/65 








BR 


IS 


;;G0 DO THE NEXT BIT 


006302 


012601 






2$: 


MOV 


(SP)*.R1 


;;POP THE STACK INTO R1 


006304 


016666 


000002 


000004 




MOV 


2(SP).4(SP) 


; .-ADJUST THE STACK 


006312 


012616 








MOV 


(SP)*. (SP) 




006314 


000002 








RTI 




;; RE TURN TO USER 


006316 


000 


000 




S61N: 


• BYTE 


0.0 


.-.-STORAGE FOR ASCII CHAR. AND TERMINATOR 
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S8TTL BINAfiV TO OCTAL (ASCII) AND TYPE 



•THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
•OCTAL (ASCII) NUMBER AND TYPE IT. 

•STYPOS ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TvPE 

•CALL: 
• 

* 



nov 

TYPOS 
.BYTE 
.BYTE 



NUM.-(SP) 
N 



NUMBER TO BE TYPED 
CALL FOR TYPEOUT 

N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
M=1 OR 0 

;;1=TVPE LEADING ZEROS 
;;0=SUPPRESS LEADINo ZEROS 



•S'YPON ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

•STYPOS OR STYPOC 
•CALL: 

• MOV NUM,-(SP) ;. -NUMBER TO BE TYPED 

• TYPON ..-CALL FOR TYPEOUT 



•STYPOC ENTER 

•CALL: 



HERE FOR TYPEOUT OF A 16 BIT NUMBER 













MOV 


NUM.-(SP) 


.•NUMBER TO BE TYPED 










• • 


TYPOC 




.-CALL FOR TYPEOUT 


006320 


017646 


000000 




STYPOS: 


MOV 


a(SP).-(SP) 


.•PICKUP THE MODE 


006324 


116637 


000001 


006543 




H0V8 


1(SP).S0FILL 


.-LOAD ZERO FILL SWITCH 


006332 


112637 


006545 






M0V8 


(SP)*,S0M0DE*1 ; 


.•NUMBER OF DIGITS TO TYPE 


006336 


062716 


000002 






ADD 


#2,(SP) 


.-ADJUST RETURN ADDRESS 


006342 


000406 








BR 


STYPON 




006344 


112737 


000001 


006543 


STYPOC: 


MOVB 


#1,$0FILL 


.-SET THE ZERO FILL SWITCH 


006352 


1^2737 


000006 


006545 




H0V6 


#6.S0M0DE*1 


;SET FOR SIX(6) DIGITS 


006360 


1 12737 


000005 


006542 


STYPON: 


MOVB 


#5,S0CNT 


;SET THE ITERATION COUNT 


006566 


010346 








MOV 


R3. -(SP) 


.SAVE R3 


006370 


0104<.6 








MOV 


R4.-(SP) 


.•SAVE R4 


006372 


010546 








MOV 


R5.-(SP) 


.SAVE R5 


006374 


113704 


006545 






MOVB 


S0M0DE*1,R4 ; 


;GET THE NUMBER OF DIGITS TO TYPE 


006400 


005404 








NEC 


R4 




006402 


062704 


000006 






ADD 


#6,R4 


.•SUBTRACT IT FOR MAX. ALLOWED 


006406 


110437 


'^0654< 






MOVB 


R4.S0M0DE 


;SAVE IT FOR USE 


006412 


113704 


006543 






MOVB 


S0FILL,R4 


.-GET THE ZERO FILL SWITCH 


006416 


016605 


000012 






MOV 


12(SP),R5 


.•PICKUP THE INPUT NlfCER 


006422 


005003 








CLR 


R3 


.•CLEAR THE OUTPUT WORD 


006424 


006105 






IS: 


ROL 


R5 


.•ROTATE MSB INTO "C" 


006426 


000404 








BR 


3S 


;G0 DO MSB 


006430 


006105 






2S: 


ROL 


R5 


.•FORM THIS DIGIT 


006432 


006105 








ROL 


R5 




006434 


006105 








ROL 


R5 




006436 


010503 








MOV 


R5.R3 




006440 


006103 






3S: 


ROL 


R3 


.-GET LS8 OF THIS DIGIT 
;TYPE THIS DIGIT? 


006442 


105337 


006544 






DECS 


SOMODE 


006446 


100016 








BPL 


7S 


;BR IF NO 


006450 


042703 


1 77770 






6IC 


#1 77770, R3 


:GET RID OF JUNK 


006454 


001002 








BNE 


4S 


.-TEST FOR 0 


006456 


005704 








TST 


R4 


.•SUPPRESS THIS 0? 


006460 


001403 








BEO 


5$ 


'BR IF YES 


006462 


005204 






4S: 


INC 


R4 


•DON'T SUPPRESS ANYMORt O'S 


006464 


052703 


000060 






BIS 


#'0.R3 
*• .R3 


;MAKE THIS DlG'.i ASCII 


006470 


052703 


000040 




5S: 


BIS 


:MAKE ASCII Ir NOT ALREADY 
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006474 


110337 


006540 




H0V8 


006500 


104401 


006540 


7$: 


TYPE 


006504 


105337 


006542 


DECS 


006510 


003347 






B6T 


006512 


002402 






FLT 


006514 


005204 






INC 


006516 


000744 






BR 


006520 


012605 




6S: 


nov 


006522 


012604 






NOV 


006524 


012603 






MOV 


006526 


016666 


000002 000004 




NOV 


006534 


012616 






MOV 


006536 


000002 




8$: 


RTJ 


006540 


000 




.BYTE 


006541 


000 






.BYTE 


006542 


000 




SOCNT : 
$OF!LL: 


.BYTE 


006543 


000 




.BYTE 


006544 


000000 




SOnODE : 


.UORD 



12; 19 PAGE 46-1 SEQUENCE 5-, 



R3.8$ ;;SAVE FOR ^ypinG 

.8$ ;;G0 TYPE THIS DIGIT 

$OCNT ;; COUNT BY 1 

2$ :;BR IF NORE TO DO 

6S * 'BR IF DONE 

R4 --INSURE LAST DIGIT ISN'T A BLANK 

21 ;;G0 DO THE LAST DIGIT 

(SP)*,R5 .-.-RESTORE R5 

(SP)*.R4 ; .-RESTORE R4 

(SP) + . R3 ; .-RESTORE R3 

2CSP).4(SP) ;;SET THE STACK FOR RETURNING 

(SP)*,(SP) 

- 'RETURN 

0 ;; STORAGE FOR ASCII DIGIT 

0 ;; TERMINATOR FOR TYPE ROUTINE 

0 ;. 'OCTAL DIGIT COUNTER 

0 .'.'ZERO FILL SWITCH 

0 ; .'NUMBER OF DIGITS TO TYPE 
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1907 .SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 

)*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A S-DIGIT 
:*SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
.••NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
.••BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
.••REPLACED WITH SPACES. 











• • 


MOV 


NUM, -(SP) 


.-PUT THE BINARY NUMBER ON THE STACK 










• • 


TYPDS 




:G0 TO THE ROUTINE 


006546 








STYPDS: 








006546 


010046 








MOV 


RO, -(SP) ; 


.-PUSH RO ON STACK 


006550 


010146 








MOV 


RI.-(SP) 


.•PUSH R1 ON STACK 


006552 


010246 








MOV 


R2.-(SP) 


.-PUSH R2 ON STACK 


006554 


010346 








MOV 


R3. -(SP) 


.•PUSH R3 ON STACK 


006556 


010546 








MOV 


R5, -(SP) 


;PUSH R5 ON STACK 


006560 


012746 


020200 






MOV 


#20200. -(SP) 


;SET BLANK SWITCH AND SIGN 


006564 


016605 


000020 






MOV 


20(SP).R5 


.-GET THE INPUT NUMBER 


006570 


100004 








BPL 


1S 


:BR IF INPUT IS POS. 


006572 


00S405 








NEG 


R5 

#'-,l(SP) 


.■MAKE THE BINARY NUMBER POS. 


006574 


112766 


000055 


000001 




MOVB 


:MAKE THE ASCII NUMBER NEG. 


006602 


005000 






1$: 


CLR 


RO 


.•ZERO THE CONSTANTS INDEX 


006604 


012703 


006762 






MOV 


m8LK,R3 
#' .(R3)+ 


.•SETUP THE OUTPUT POINTER 


006610 


112723 


000040 






MOVB 


.-SET THE FIRST CHARACTER TO A BLANK 


006614 


005002 






2$: 


CLR 


R2 


.•CLEAR THE BCD NUMBER 


006616 


016001 


006752 






MOV 


$DT8L(R0),R1 


;GET THE CONSTANT 


006622 


160105 






3$: 


SUB 


R1,R5 


.•FORM THIS BCD DIGIT 


006624 


002402 








BLT 


4S 


:BR IF DONE 


006626 


005202 








INC 


R2 


.-INCREASE THE BCD DIGIT BY 1 


006630 


000774 








BR 


3S 




006632 


060105 






4$: 


ADD 


R1.R5 


.-ADD BACK THE CONSTANT 


006634 


005702 








rsT 


R2 


.•CHECK IF BCD DI6IT=0 


006636 


001002 








BNE 


5$ 


.•FALL THROUGH IF 0 


006640 


105716 








TSTB 


(SP) 


.•STILL DOING LEADING O'S? 


006642 


100407 








BMI 


7S 


;8R IF YES 


006644 


106316 






5$: 


ASL8 


(SP) 


;MSD? 


006646 


103003 








BCC 


6$ 


;BR IF NO 


006650 


116663 


000001 


\77777 




MOVB 


1 (SP). -1(R3) 
#'0,R2 
#' ,R2 


.•YES— SET THE SIGN 


006656 


052702 


000060 




6S: 


BIS 


;MAKE THE BCD DIGIT ASCII 


006662 


052702 


000040 




7$: 


BIS 


;MAKF IT A SPACE IF NOT ALREADY A DIGIT 


006666 


110223 








MOVB 


R2,(R3)+ 


;PUT THIS CHARACTER IN THE OUTPUT BUFFER 


006670 


005720 








TST 


(R0) + 


.-JUST INCREMENTING 


006672 


020027 


000010 






CMP 


R0,#10 


.'CHECK THE TABLE INDEX 


006676 


002746 








BLT 


2S 


:G0 DO THE NEXT DIGIT 


006700 


003002 








B6T 


8$ 


;60 TO EXIT 


006702 


010502 








MOV 


R5 .R2 


.-GET THE LSD 


006704 


000764 








BR 


6$ 


;G0 CHANGE TO ASCII 


006706 


105726 






8$: 


TSTB 


(SP)-» 


;WAS THE LSD THE FIRST NON-ZERO? 


006710 


100003 








BPL 


9S ; 


*BR IF NO 


006712 


116663 


)77777 


y7777t 




MOVB 


-1(SP).-2(R3) ; 


•YES— SET THE SIGN FOR TYPING 


006720 


105013 






9$: 


CLRB 


(R3) 


;SET THE TERMINATOR 


006722 


012605 








MOV 


(SP)+.R5 


;POP STACK INTO R5 


006724 


012603 








MOV 


(SP)+.R3 


;POP STACK INTO R3 


006726 


012602 








MOV 


(SP)-^,R2 


;POP STACK INTO R2 


006730 


012601 








MOV 


(SP)-^. R1 


;POP STACK INTO R1 


006732 


012600 








MOV 


(SP)*, RO 


;POP STACK INTO RO 


006734 


104401 


006762 






TYPE 


.$DBLK 


:NOW TYPE THE NUMBER 



CKKIBDO 
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E 5 
47-1 



006740 016666 000002 000004 MOV 

006746 012616 NOV 

006750 000002 , _ RTI ^ 

006752 023420 SDTBL: 10000. 

006754 001750 1000. 

006756 000144 100. 

006760 000012 10. 

006762 SDBLK: .BLKU 



2(SP). 4(SP) 
(SP)*.(SP) 



.-.•ADJUST THE STACK 
: .-RETURN TO USER 



SEQUENCE 56 
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006772 
006772 
006774 
006776 
007000 
007002 
007004 
007006 
007012 
007016 
007022 
007026 



007030 
007030 
007034 
007040 
007044 
007050 
007052 
007054 
007056 
007060 
007062 
007064 



010046 
010146 
010246 
010346 
010446 
010546 
016646 
016646 
016646 
016646 
000002 



012666 
012666 
012666 
012666 
012605 
012604 
012603 
012602 
012601 
012600 
000002 



000022 
000022 
000022 
000022 



000022 
000022 
000022 
000022 



.S8TTL SAVE AND RESTORE R0-R5 ROUTINES 



•SAVE R0-R5 
*CALL: 

• SAVRE6 

•UPON RETURN FROM SSAVREG THE 



• TOP ( + 16) 

• +2 ( + 18) 

• +4 R5 

• +6 — R4 

• +8 ft3 

• >10 R2 

• + 12 R1 

.•♦14 RO 

SSAVREG: 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 

.••RESTORE R0-R5 
; *CALL : 

;• RESREG 
SRESREG: 

MOV 
MOV 
MOV 

nov 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 



RO. -(SP) 

Rl.-(SP) 

R2.-(SP) 

R3.-(SP) 

R4.-(SP) 

R5.-(SP) 

22(SP).-{SP) 

22{SP).-(SP) 

22(SP).-(SP) 

22(SP).-(SP) 



(SP)+. 
(SP)+. 
(SP)+. 
(SP)+, 
(SP)+, 
(SP)+, 
(SP)*, 
(SP)+. 
(SP)+. 
(SP)+. 



22(SP) 

22 (SP) 

22(SP) 

22(SP) 

R5 

R4 

R3 

R2 

Rl 

RO 



STACK WILL LOOK LIKE: 



;;PUSH 
;;PUSH 
;;PUSH 
;;PUSH 
;;PUSH 
.-.PUSH 
.-.•SAVE 
; ; SAVE 
.-.SAVE 
; ; SAVE 



RO ON 
Rl ON 
R2 ON 
R3 ON 
R4 ON 
R5 ON 
PS OF 
PC OF 
PS OF 
PC OF 



STACK 

STACK 

STACK 

STACK 

STACK 

STACK 

MAIN FLOW 

MAIN FLOW 

CALL 

CALL 



RESTORE PC OF CALL 
RESTORE PS OF CALL 
RESTORE PC OF MAIN FLOW 
RESTORE PS OF MAIN FLOU 
POP STACK INTO R5 
POP STACK INTO R4 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO Rl 
POP STACK INTO RO 



CKKTBOO 11/44 
DOUBLE LENGTH 

1909 



MEM HGMT PRT B 
BINARY TO OCTAL 



MACRO M1113 
ASCII CONVERT 



12-JAN-82 
ROUTINE 



12:19 PAGE 



G 

49 



SEQUENCE 58 



007066 
007070 
007074 
007100 
007104 
007110 
007112 
007114 
007116 
007120 
007122 
007124 
007126 
007130 
007132 
007136 
007140 
007142 
007144 
007146 
007150 
007152 
007154 
007156 
007160 
007162 
007166 
007170 



104413 
016601 
012705 
012704 
012703 
012100 
012101 
005002 
110245 
010002 
005304 
003007 
001405 
005205 
010566 
104414 
000207 
006203 
006001 
006000 
006001 
006000 
006001 
006000 
040302 
062702 
000753 



000002 
007205 
000014 
177770 



000002 



000060 



.S6TTL DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE 

*THIS ROUTINE WILL CONVERT A 32-6IT UNSIGNED BINARY NUMBER TO AN 
*UNSIGNED OCTAL ASCIZ NUMBER. 
•CALL 



§0820: 



1$: 



2$: 
3S: 



$0CTVL; 



MOV 

JSR 

RETURN 

SAVREG 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

CLR 

M0V8 

MOV 

DEC 

BGT 

BEO 

INC 

MOV 

RESREG 

RTS 

ASR 

ROR 

ROR 

ROR 

ROR 

ROR 

ROR 

61 C 

ADD 

BR 

.BLK8 



*PNTR.-(SP) 
PC,a#$DB20 



2(SP), R1 

*$OCTVL*13..R5 

*12. .R4 

#*C7.R3 

(R1)+,R0 

(R1)+.R1 

R2 

R2.-(R5) 

R0.R2 

R4 

3$ 

2$ 

R5 

R5, 2(SP) 

PC 
R3 
R1 
RO 
Rl 
RO 
Rl 
RO 

R3.R2 
#'0.R2 
1$ 
U. 



POINTER TO LOU WORD OF BINARY NUMBER 
CALL THE ROUTINE 

THE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK 

SAVE ALL REGISTERS 

PICKUP THE POINTER TO LOW WORD 

POINTER TO DATA TABLE 

DO ELEVEN CHARACTERS 

MASK 

LOWER WORD 
HIGH WORD 
TERMINATOR 

PUT CHARACTER IN DATA TABLE 

GET THIS DIGIT 

COUNT THIS CHARACTER 

BR IF NOT THE LAST DIGIT 

BR IF IT IS THE LAST DIGIT 

ALL DIGITS DONE-ADJUST POINTER FOR FIRST 

ASCIZ CHAR, t PUT IT ON THE STACK 

RESTORE ALL REGISTERS 

RETURN TO USER 

POSITION THE MASK FOR THE LAST DIGIT 
POSITION THE BINARY NUMBER FOR 
THE NEXT OCTAL DIGIT 



MASK OUT ALL JUNK 

MAKE THIS CHAR. ASCII 

GO PUT IT IN THE DATA TABLE 

RESERVE DATA TABLE 



CKKT8D0 ME« »1GMT PRT B 

TRAP DECODER 

1910 



H 5 



007206 
007210 
0072U 
007216 
007220 
007222 
007226 

007230 
007232 
007240 



0072A2 
0072A4 
007246 
007250 
007252 
007254 
007256 
007260 
007262 
007264 
007266 
007270 
007272 



010046 
016600 
005740 
111000 
006300 
016000 
000200 

011646 
016666 
000002 



007230 
005432 
006344 
006320 
006360 
006546 
006244 
004356 
004306 
004630 
004760 
006772 
007030 
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SBTTL TRAP DECODER 



SEQUENCE 59 



000002 



007242 



000004 000002 



*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE "TRAP" INSTRUCTION 
*AMD USE IT TO INDEX THROUGH THE TRAP TA8LE FOR THE STARTING ADDRESS 
•OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
•GO TO THAT ROUTINE. 
STRAP: HOV RO.-(SP) ;;SAVE RO 

;;6ET TRAP ADDRESS 
; .-BACKUP BY 2 
;;GET RIGHT BYTE OF TRAP 
;;POSITION FOR INDEXING 
;; INDEX TO TABLE 
;;G0 TO ROUTINE 
GETPRI" MACRO 



;;THIS 
$TRAP2 



MOV 
MOV 
TST 
MOVB 
ASL 
MOV 
RTS 
IS USE 
MOV 
MOV 



RO.-(SP) 
2(SP).R0 
-(RO) 
(RO),RO 
RO 

$TRPAD'RO),RO 
RO 

TO HANDLE THE 



(SP).-(SP) 
4(SP).2(SP) 



;;MOVE THE PC DOWN 
;;MOVE THE PSW DOWN 
;; RESTORE THE PSW 



RTI 

.SBTTL TRAP TABLE 
•THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
•BY THE "TRAP" INSTRUCTION. 
ROUTINE 



STRPAD: .WORD 
STYPE 
STYPOC 
$ TYPOS 
STYPON 
STYPDS 
STYPBN 
SGTSWR 
$CKSWR 
SRDCHR 
SRDLIN 
SSAVREG 
SRESRE6 



$TRAP2 

CALL=TYPE TRAP+1 (104401) TTY TYPEOUT ROUTINE 

CALL=TYPOC TRAP*2( 104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 

CALL=TYPOS TRAP*3( 104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 

CALL=TYPON TRAP*4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 

CALL=TYPDS TRAP*5( 104405) TYPE DECIMAL NUMBER (WITH SIGN) 

CALL=TYPBN TRAP*6( 104406) TYPE BIMARY (ASCII) NUMBER 

CALL=GTSWR TRAP*7( 104407) GET SOFT-SWR SETTING 

CALL=CKSWR TRAP*10( 104410) TEST FOR CHANGE IN SOFT-SWR 

CALL=RDCHR TRAP+11 (104411) TTY TYPEIN CHARACTER ROUTINE 

CALL=RDLIN TRAP*12(104412) TTY TYPEIN STRING ROUTINE 

CALL=SAVREG TRAP*13( 104413) SAVE R0-R5 ROUTINE 

CALL=RESREG TRAP*U(1044U) RESTORE R0-R5 ROUTINE 



I 5 



ftCICTBDO MEM M6MT PRT B 

POyER DOWN AND UP ROUTINES 
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SEQUENCE 60 



1911 



00727<, 
007302 
007310 
007312 
0073U 
007316 
007320 
007322 
00732A 
007330 
007334 
007342 
007344 



012737 
012737 
010046 
010146 
010246 
010346 
010446 
010546 
017746 
010637 
012737 
000000 
000776 



007452 
000340 



171610 
007456 
007346 



000024 
000026 



000024 



007346 


012737 


007452 


000024 


007354 


013706 


007456 




007360 


005037 


007456 




007364 


005237 


007456 




007370 


001375 






007372 


012677 


171542 




007376 


012605 






007400 


012604 






007402 


012603 






007404 


012602 






007406 


012601 






007410 


012600 






007412 


012737 


007274 


000024 


007420 


012737 


000340 


000026 


007426 


104401 






007430 


007460 






007432 


012716 






007434 


020000 






007436 


042766 


000020 


000002 


007444 


005037 


001310 




007450 


000002 






007452 


000000 






007454 


000776 






007456 


000000 






1912 007460 


012 


015 


040 


007463 


120 


117 


127 


007466 


105 


122 


040 


007471 


106 


101 


111 


007474 


114 


125 


122 


007477 


105 


040' 


055 


007502 


040 


122 


105 


007505 


123 


124 


101 


007510 


122 


124 


111 


007513 


116 


107 


040 


007516 


012 


015 


000 



.S8TTL 
• • ***** 

iPOWER 
iPURDN 



POWER DOWN AND UP ROUTINES 
************************************************«»*»«»*»** 

DOWN ROUTINE 



nOV 4r$ILLUP,a#PWRVEC 

MOV 4r340,a#PWRVEC^2 

MOV RO,-(SP) 

MOV R1,-(SP) 

MOV R2.-(SP) 

MOV R3.-(SP) 

MOV R4.-(SP) 

MOV R5,-(SP) 

MOV aSWR.-(SP) 

MOV SP.$SAVR6 

MOV #$PWRUP,a#PWRVEC 
HALT 

BR .-2 



******************************** 


•POWER UP ROUTINE 


SPWRUP : 


MOV 


mLLUP,a«PWRVEC 




MOV 


$SAVR6,SP 




CLR 


$SAVR6 


1$: 


INC 


SSAVR6 




BNE 


1$ 




MOV 


(SP) ♦.aswR 




MOV 


(SP)+, R5 




MOV 


(SP)-».R4 




MOV 


(SP)*. R3 




MOV 


(SP)+.R2 




MOV 


(SP)*.R1 




MOV 


(SP)*,RO 




MOV 


«$PWRDN,a#PURVEC 




MOV 


#340.a#PWRVEC-»2 




TrPE 




SPWRMG: 


.WORD 


PWRMSG 




MOV 


(PC)*,(SP) 


SPWRAD : 


.WORD 


START 




BIG 


*20.2(SP) 




CLR 


STSIT 




RTI 




$ILLUP: 


HALT 






BR 


.-2 


$SAVR6: 


0 




PURMSG: 




<12><15>? POWER 



;;SET FOR FAST UP 
;PRI0:7 

.•PUSH RO ON STACK 
:PUSH R1 ON STACK 
.•PUSH R2 ON STACK 
;PUSH R3 ON STACK 
.•PUSH R4 ON STACK 
.•PUSH R5 ON STACK 
.-PUSH aSWR ON STACK 
.•SAVE SP 
;;SET UP VECTOR 

;;HANG UP 

k******************************** 

;SET FOR FAST DOWN 
GET S? 

WAIT LOOP FOR THE TTY 
WAIT FOR THE INC 
OF WORD 

POP STACK INTO aSWR 
POP STACK INTO R5 
POP STACK INTO R4 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO Rl 
POP STACK INTO RO 
.SET UP THE POWER DOWN VECTOR 
PRI0:7 

REPORT THE POWER FAILURE 
POWER FAIL MESSAGE POINTER 
RESTART AT START 
RESTART ADDRESS 
CLEAR "T" BIT 
CLEAR THE "T" BIT FLAG 

THE POWER UP SEQUENCE WAS STARTED 
BEFORE THE POWER DOWN WAS COMPLETE 
PUT THE SP HERE 
FAILURE - RESTARTING ?<12><15> 



1913 



.EVEN 
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ERROR MESSAGES, DATA HEADERS-TABLES t 
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FORMATS 
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.S8TTL ERROR 


1916 












1917 00752? 


125 


116 


105 


EM1 ■ 


ASCI 


1918 007562 


125 


116 


105 


FM2 ■ 

trie • 


ASCI 


1919 007631 


115 


105 


115 


FM10 


ASCI 


1920 007701 


101 


103 


103 


FM1 1 


ASCI 


1921 007750 


123 


122 


060 


FM1? 


ASCI 


1922 010022 


123 


122 


062 


FM13 


ASCI 


1923 010073 


120 


101 


107 


EMU 


.ASCI 


1924 010154 


120 


101 


107 


EMI 5 


!asci 


1925 010237 


123 


122 


060 


EMI 6 


ASCI 


1926 010315 


123 


122 


060 


EM21 


.ASCI 


1927 010362 


123 


122 


060 


EM22 


!asci 


1928 010431 


123 


122 


062 


EM23 


.ASCI 


1929 010464 


104 


111 


104 


EM24 


.ASCI 


1930 010523 


113 


124 


040 


EM25 


.ASCI 


1931 010570 


123 


122 


060 


EM26 


!asci 


1932 010636 


105 


122 


122 


EM27 


.ASCI 


1933 010713 


115 


106 


120 


EM30 


.ASCI 


1934 010756 


115 


124 


120 


EM31 


.ASCI 


1935 011021 


123 


124 


101 


EM32 


.ASCI 


1936 011057 


113 


105 


122 


EM33 


.ASCI 


1937 011135 


115 


056 


115 


EM34 


.ASCI 


1938 011216 


111 


lU 


114 


EM35 


.ASCI 


1939 011252 


123 


122 


060 


EM36 


• ASCI 


1940 011327 


120 


123 


127 


EM37 


• ASCI 


1941 011372 


101 


102 


117 


EM40 


.ASCI 


1942 011457 


104 


040 


123 


EM41 


.ASCI 


1943 011523 


111 


116 


103 


EM42 


.ASCI 


1944 011566 


124 


122 


111 


EM43 


.ASCI 


1945 011633 


127 


122 


117 


EM44 


.ASCI 


1946 011701 


111 


114 


114 


EM45 


.ASCI 


1947 011740 


103 


123 


115 


EM46 


• ASCI 


1948 012002 


103 


123 


115 


EM47 


.ASCI 


1949 012041 


103 


123 


115 


EM50 


• ASCI 


1950 012070 


103 


123 


115 


EM51 . 


• ASCI 


1951 012126 


103 


123 


115 


EM52 


.ASCI 


1952 012152 


103 


123 


115 


EM53 


.ASCI 


1953 012217 


103 


123 


115 


EM54 


.ASCI 


1954 012263 


103 


123 


115 


EM55 


.ASCI 


1955 012327 


103 


123 


115 


EM56 


.ASCI 


1956 012413 


103 


123 


115 


EMS 7 


.ASCI 


1957 012466 


123 


122 


062 


EM58 


• ASCI 


1958 012545 


104 


117 


105 




• ASCI 


1959 012625 


124 


110 


105 




.ASCI 


1960 










.EVEN 
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MESSAGES, DATA HEADERS-TABLES t FORMATS 
SEX 

/UNEXPECTED CPU TRAP TO LOC. 004/ 

/UNEXPECTED MEM. M6MT. TRAP TO LOC. 250/ 

/MEMORY nCMT. ACCESS ABORT DID NOT OCCUR/ 

/ACCESS ERROR DID NOT ABORT INSTRUCTION/ 

/SRO DID NOT REPORT ACCESS ERROR CORRECTLY/ 

/SR2 DID NOT LOCKUP CORRECT VIRTUAL ADOR./ 

/PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE/ 

/PAGE LGTH. ABORT DID NOT OCCUR WHEN IT SHOULD HAVE/ 

/SRO DID NOT REPORT PAGE LGTH. ABORT CORRECTLY/ 

/SRO OR SR2 CHANGED BY A SECOND ABORT/ 

/SRO OR SR2 WERE NOT "RESET" BY A RESET/ 

/SR2 NOT TRACKING CORRECTLY/ 

/DID NOT TRAP THRU KERNEL SPACE/ 

/KT ERROR SERVICED ON ODD ADDR. ERROR/ 

/SRO OR SR2 CHANGED BY ODD ADDR. ERROR/ 

/ERROR DURING "DOUBLE ERROR" (KT t ODD ADDR.)/ 

/MFPI INSTRUCTION PUSHED WRONG DATA/ 

/MTPI INSTRUCTION LOADED WRONG DATA/ 

/STACK NOT PUSHED BY MFPI-MTPI/ 

/KERNEL PAGE ACCESS INSTEAD OF USER; MFPI-MTPI/ 

/M.M. ABORT IN KERNAL D-SPACE HAD WRONG CONDITION/ 

/ILLEGAL MODE 10 NOT ABORTED/ 

/SRO DID NOT REPORT ILLEGAL MODE 10 CORRECTLY/ 

/PSW CHANGED BY AN RTI IN USER MODE/ 

/ABORT I KERNAL D-SPACE PICKED UP VECTOR FROM I-SPACE/ 

/D SPACE ENABLE CIRCUITRY HAS FAILED/ 

/INCORRECT STORE BY MTP INSTRUCTION/ 

/TRIED TO REFERENCE NON-RESIDENT PAGE/ 

/WRONG DATA FETCHED BY MFP INSTRUCTION/ 

/ILLEGAL CSM DID NOT TRAP TO 10/ 

/CSM DID NOT ENTER SUPERVISOR MODE/ 

/CSM SET UP WRONG PREVIOUS MODE/ 

/CSM SET UP STACK WRONG/ 

/CSM PUSHED INCORRECT ARGUMENT/ 

/CSM PUSHED WRONG PC/ 

/CSM DID NOT CLEAR OLD PSW BITS <3:0>/ 

/CSM ACCESSED WRONG SUPERVISOR SPACE/ 

/CSM ABORTED WHEN IT SHOULD NOT HAVE/ 

?CSM FAILED TO INCREMENT/DECREMENT REGISTER PROPERLY? 

/CSM FAILED TO PUT PROPER ARGUMENT ON STACK/ 

!SR2 LOCKED UP AN 11/34 COMPATIBLE ADDRESS THATI<CRLF> 

.'DOES NOT MAKE IT COMPATIBLE WITH AN 11/70 SINCE!<CRLF> 

.'THE OPTIONAL M7095 ECO #8 IS MISSING! 
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SEQUENCE 



1962 












.S8TTL 


1963 


012672 


117 


114 


104 


OHI : 


.ASCI2 


1964 


012752 


117 


114 


104 


PH2: 


.ASCIZ 


1965 


013042 


120 


104 


122 


DHIO 


.ASCIZ 


1966 


013102 


123 


122 


060 


0H12 


.ASCIZ 


1967 


013162 


123 


122 


062 


DHI 3 


.ASCIZ 


1968 


013242 


126 


056 


102 


DH14. 


.ASCIZ 


1969 


013322 


126 


056 


102 


DHI 5 


.ASCIZ 


1970 


01 3362 


126 


056 


102 


DH16 


.ASCIZ 


1971 


013442 


126 


056 


102 


DHI 7 


.ASCIZ 


1972 


013522 


123 


122 


062 


DH20 


.ASCIZ 


1973 


013562 


106 


111 


122 


DH21. 


.ASCII 


197A 


013617 


123 


122 


060 




.ASCIZ 


1975 


013677 


123 


122 


060 


DH22 


.ASCIZ 


1976 


013737 


120 


123 


127 


DH24 


.ASCIZ 


1977 


013777 


105 


130 


120 


DH26. 


.ASCII 


1978 


014031 


123 


122 


060 




.ASCIZ 


1979 


014111 


105 


130 


120 


DH27; .ASCII 


1980 


014123 


120 


123 


127 




.ASCII 


1981 


014157 


061 


067 


060 




.ASCII 


1982 


014214 


122 


105 


103 




.ASCII 


1983 


014226 


120 


123 


127 




.ASCIZ 


1984 


014306 


104 


101 


124 


DH30 


.ASCII 


1985 


014323 


105 


130 


120 


DH32 


.ASCIZ 


1986 


014362 


124 


105 


123 


.ASCIZ 


1987 


014401 


123 


122 


060 


DH33 


.ASCIZ 


1988 


014441 


050 


115 


115 


DH34 


.ASCIZ 


1989 


014532 


123 


122 


060 


DH36 


•ASCIZ 


1990 


014572 


120 


123 


127 


DH37 


.ASCIZ 


1991 


014632 


050 


120 


123 


DH40 


.ASCIZ 


1992 


014703 


105 


122 


122 


DH41 


.ASCII 


1993 


014733 


122 


105 


107 




.ASCIZ 


1994 


015007 


107 


104 


104 


DH42 


.ASCIZ 


1995 


015047 


050 


115 


115 


DH43 


.ASCIZ 


1996 


015117 


105 


130 


120 


DH44 


.ASCIZ 


1997 


015157 


117 


114 


104 


DH45 


.ASCIZ 


1998 


015207 


124 


105 


123 


DH55 


.ASCIZ 


1999 


015246 


124 


105 


123 


DH57 


.ASCIZ 


2000 












.EVEN 



DATA HEADERS 
/OLD PC OLD PSW R6 WAS 
/OLD PC OLD PSW R6 WAS 
/PDR 4 PSW TESTNO 
/SRO WAS EXPECTD PDR 4 
/SR2 WAS EXPECTD PDR 4 
/V.8.A. KIPDR4 
KIPDR4 
K1PDR4 
KIPDR4 



/V.8.A. 
/V.8.A. 
/V.8.A. 

/SR2 WAS EXPECTD 
/FIRST ABORT 



CPUERR TESTNO 
SRO SR2 
ERRORPC/ 
PSW TESTNO 
PSW TESTNO 
SRO WAS SR2 WAS TESTNO 
TESTNO ERRORPC/ 
SRO WAS EXPECTD TESTNO 
SR2 WAS EXPECTD TESTNO 
TESTNO ERRORPC/ 



SECOND A80RT/<CRLF> 
/SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO 
/SRO WAS SR2 WAS TESTNO ERRORPC/ 
TESTNO ERRORPC/ 
RECEIVED/<CRLF> 
SRO WAS SR2 WAS TESTNO 



ERRORPC/ 

TESTNO ERRORPC/ 

ERRORPC/ 
ERRORPC/ 
ERRORPC/ 

ERRORPC/ 
ERRORPC/ 



ERRORPC/ 



/PSW WAS R6 WAS 
/EXPECTED 
/SRO SR2 
/EXPECTED:/<CRLF> 
/PSW PC SRO 
/1 7001 7 (3$+4) 020147 
/RECEIVED:/<CRLF> 
/PSW PC SRO 
/DATA DATA/<CRLF> 
/EXPECTD RECEIVD TESTNO 
/TESTNO ERR PC/ 
/SRO WAS SR2 WAS TESTNO 
/(HMRO) (fWfil) («MR2) 
/SRO WAS EXPECTD TESTNO 
/PSW WAS EXPECTD TESTNO 
/(PSW) TESTNO 
/ERROR 



ERRORPC/ 



SR2/<CRLF> 
(3$)/<CRLF> 



SR2 

ERR PC/ 



TESTNO ERRORPC/ 



ERRORPC/ 

TESTNO ERRORPC EXPECTING 020031/ 
ERRORPC/ 
ERRORPC/ 
ERRORPC EXPECTING XXX340/ 



AUTOI-D VIRTUAL/<CRLF> 
/RE6ISTR RE61STR ADDRESS TESTNO PC AT ABORT/ 
/6DDATA STORED TESTNO ERRORPC/ 

(mR2) TESTNO ERRORPC/ 
TESTNO ERRORPC/ 
ERRORPC/ 
RO EXP RO RCV/ 
ARGEXP AR6RCV/ 



/(««R0) (WRD 
/EXPECTD (PSW) 
/OLDPSW 
/TESTNO 
/TESTNO 



TESTNO 
ERR PC 
ERR PC 



ClkKTBDO 11/44 
DATA TABLES 



HEM '^'■jMT PRT B 



MACRO HIII3 



2002 

2003 

2004 

2005 

2006 

2007 

2008 

2009 

2010 

2011 

2012 

2013 

20K 

2015 

2016 

2017 

2018 

2019 

2020 

2021 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 

2030 

2031 

2032 



015306 
015324 
015344 
015356 
015374 
015412 
015430 
015442 
015460 
015476 
015510 
015526 
015540 
015552 
015570 
015606 
015620 
015626 
015642 
015654 
015664 
015700 
015712 
015726 
015742 
015754 
015766 
016000 
016010 
016022 



001260 
001260 
001166 
001264 
001270 
001162 
001162 
001162 
001162 
001270 
001176 
001264 
001164 
001162 
001164 
035336 
001254 
001164 
001264 
001162 
001264 
001162 
001162 
001264 
001170 
001162 
001176 
035332 
001254 
001254 



001262 
001262 
001176 
001170 
001172 
001172 
001172 
001 1 72 
001172 
001164 
001202 
001270 
001166 
001164 
001170 
001176 
001116 
001166 
001164 
001254 
001266 
001164 
001164 
001266 
035334 
035326 
035330 
001254 
001116 
001116 



001256 
001256 
001254 
001166 
001166 
001264 
001254 
001264 
001270 
001254 
001264 
001254 
001254 
001264 
001264 
001254 
000000 
001170 
001254 
001116 
001270 
001254 
001166 
001270 
001254 
001254 
001254 
001116 
001176 
001176 



DTI: 
DT2: 
DT10 
0712 
DT13 
DTK 
DT15 
DT16 
DT17 
DT20 
DT21 
DT22 
DT24 
DT26 
DT27 
DT30 
DT32 
0T34 
DT36 
DT40 
DT41 
DT42 
DT43 
DT45 
Dr46 
DT47 
DT50 
DT52 
DT55 
Dr57 
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.S8TTL DATA TABLES 

.WORD TRAPPC,TRAPPS,UASR6.CPUERR.TESTN0,$£RRPC,0 

.WORD TRAPPC, TRAPPS.UASR6.UASSR0tUASSR2, TESTN0,$ERRPC .0 

.WORD $REG2.iTHPO-TESTNO.iERRPC.O 

. WORD WASSRO , $RE G5 , $RE G2 . $ T«PO , TE 5 TNO . SERRPC , 0 

. WORD WASSR2 , $RE G4 . $REG2 . STNPO . TE S TNO , SERRPC . 0 

.WORD $REG0,iREG4,WASSR0,WASSR^, TESTNO, SERRPC, 0 

. WORD SRE GO , SRE G4 , T E S TNO , SERRPC , 0 

. WORD SREGO , SRE G4 , WASSRO , SRE G2 , TE S TNO , SERRPC , 0 

.WORD SREG0.$REG4.WASSR2,SREG3.TESTN0. SERRPC. 0 

.WORD WASSR^.SREGI.TESTNO. SERRPC, 0 

.WORD STf1P0.$THP2,WASSR0,WASSR2,TESTNO, SERRPC, 0 

.WORD WASSR0,WASSR2,TESTNO,SERRPC,0 

.WORD SREGI ,SREG2.TESTNO,$ERRPC.O 

.WORD SREGO. SREGI ,WASSR0,WASSR2. TESTNO. SERRPC ,0 

.WORD SREGI .SREG3.WASSR0,WASSR2,TESTNO,SERRPC,0 

.WORD ACSMSP.STMPO, TESTNO, SERRPC, 0 

.WORD TESTNO. SERRPC, 0 

.WORD SREGI -SREG2,SREG3, TESTNO, SERRPC, 0 

.WORD WASSRO, SREGI , TESTNO, SERRPC ,0 

.WORD SREGO, TESTNO, SERRPC.O 

.WORD WASSRO. WASSR1,WASSR5,TESTN0,8ADPC,0 

.WORD SRE GO. SREGI .TESTNO. SERRPC, O 

.WORD SRE60.$REG1,SREG2, TESTNO. SERRPC, 0 

.WORD WASSRO. UASSR1 .WASSR2. TESTNO. SERRPC. 0 

.WORD $REG3,ACS«PS, TESTNO. SERRPC.O 

.WORD SREGO, CSH1ST. TESTNO, SERRPC, 0 

. WORD STWPO . CSM2ND . TESTNO. SERRPC . 0 

.WORD CS«3RD. TESTNO. SERRPC. 0 

.WORD TESTNO. SERRPC, STMPO. SREGO. 0 

.WORD TESTNO. SERRPC. ST«P0.ST«P1,0 



SEQUENCE 63 



(.KKTBOO nin ught prt b 

DATA FORMAT BYTE STRINGS 



2034 

2055 0160^4 

2036 016041 

2037 016050 

2038 016054 

2039 016057 

2040 016065 
2041 



000 
000 
000 
000 
000 
000 



000 
000 
000 
000 
000 
000 



n 5 
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000 DF1 
000 Of 2 
000 OF 3 
000 OF 5 
000 DF12: 
OF 32: 



.SBTTL OATA FORMAT BYTE STRINGS 

.BYTE 0.0.0.0.0 

.BYTE 0.0.0.0,0.0,0 

.BYTE 0.0,0,0 

.BYTE 0.0.0 

.BYTE 0.0.0,0.0.0 

.BYTE 0,0 

.EVEN 



SEQUENCE 64 



;* 
• » 

• * 



CKICTBDO 11/44 MEM MG«T PRT B MACRO Hill 3 
•**•• TRAP HANDLING ROUTINES ••••* 

2042 
2043 
2044 
2045 
2046 
2047 
2046 
2049 
2050 
2051 
2052 

2053 016070 005227 

2054 016072 177777 

2055 016074 001401 

2056 016076 000000 
2057 
2058 
2059 
2060 

2061 016100 012637 001260 

2062 016104 012637 001262 

2063 016110 010637 001256 

2064 016114 104001 

2065 016116 012737 Mill! 016072 

2066 016124 005037 177766 

2067 016130 013746 001262 

2068 016134 013746 001260 

2069 016140 000006 
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SEQUENCE 65 



.S8TTL 



TRAP HANDLING ROUTINES 



.S8TTL CPU TRAP HANDLER ROUTINE 



THIS SUBROUTINE WILL HANDLE ALL CPU TRAPS AND ABORTS THRU 
•tRRVEC" (LOC. 004). IF THIS SUBROUTINE IS ENTERED BV A 
SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A HALT IS 
EXECUTED. 



TIMERR: INC 
TIMFLG; .WORD 
BEO 
HALT 



^$: 



MOV 

MOV 

MOV 

ERROR 

MOV 

CLR 

MOV 

MOV 

RTT 



(PC)* 

-1 

1S 



(KSP)+,TRAPPC 
(KSP) ♦.TRAPPS 
KSP,UASR6 
♦ 1 

*-1,TIMFL6 

CPUERR 

TRAPPS,-(KSP) 
TRAPPC,-(KSP) 



MAKE FLAG ZERO IF FIRST TIME THRU 

NEGATIVE ONE FOR "HAVE ENTERED" FLAG 

BRANCH IF FIRST TIME IN 

STOP! - I'VE ENTERED THIS ROUTINE 

A SECOND TIME BEFORE I FINISHED 

REPORTING THE FIRST ERROR. THE 

SECOND ENTRY ADDRESS SHOULD BE ON 

THE KERNEL STACK. 

SAVE PC+2 AT TIME OF ABORT 

SAVE PS AT TIME OF ABORT 

SAVE STACK POINTER VALUE 

UNEXPECTED TRAP OR ABORT TO LOC. 4 

MAKE FLAG NEGATIVE ONE FOR NEXT TIME 

CLEAR THE CPU ERROR REGISTER 

PUT PC & PS OF TRAP ON STACK 

.•RETURN FROM INTERRUPT OR ABORT 



uMBDO MEW MGMT PRT B 

PtEMORv PUNAGEnENT TRAP HAMDLER 



2070 
2071 
2072 
2073 
2074 
207S 
2076 
2077 
2078 

2079 016K2 005227 

2080 016U4 Mlin 

2081 016U6 0OHO1 

2082 016150 000000 
2083 

208A 
2085 
2086 

2087 016152 012637 

2088 016156 012637 

2089 016162 010637 

2090 016166 013737 

2091 016174 013737 

2092 016202 042737 

2093 016210 104002 

2094 016212 012737 

2095 016220 013746 

2096 016224 013746 

2097 016230 000006 
2098 

2099 

2100 016232 000000 

2101 016326 000000 



WACRO H1113 
ROUTIMf 



12-JAN-82 12:19 PAGE 



B 

5^ 



SEOUEMCE 



6t 



001260 
001262 
001256 
177572 
177576 
160000 

}77777 
001262 
001260 



000000 
000000 



001264 
001270 
}77'i72 

016144 



000000 
000000 



SBTTL PienORV HANAGEHENT TRAP HANDlER ROUTINE 



THIS SUBROUTINE WILL HANDLE ALL UNEXPECTED MEWRV nANAGEMFN^ 
TRAPS AND ABORTS THRU '>«VEC" (LOC. 250). IF THIS SUBROUTINE !S 
ENTERED BY A SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED. A 
HALT IS EXECUTED. 



nOMERR: INC 
nOMFLG: .WORD 
BEO 
HALT 



1$: 



MOV 

MOV 

MOV 

MOV 

MOV 

BIC 

ERROR 

MOV 

MOV 

MOV 

RTT 



(PC>* 

-1 

1$ 



(KSP)*,TRAPPC 

(KSP)*.TRAPPS 

<SP,WASR6 

SRO.UASSRO 

SR2.UASSR2 

«1 60000, SRO 

*2 

#-1 .MGMFLG 

TRAPPS,-(ICSP) 

TRAPPC.-(KSP) 



MAKE FLAG ZERO IF FIRST TIME THRU 

NEGATIVE ONE FOR "HAVE ENTERED" FLAG 

BRANCH IF FIRST TIME IN 

STOP. - I'VE ENTERED THIS ROUTINE 

A SECOND TIME BEFORE I FINISHED 

REPORTING THE FIRST ERROR. THE 

SECOND ENTRr ADDRESS SHOULD BE ON 

THE KERNEL STACK. 

SAVE PC+2 AT TIME OF ABORT 

SAVE PS AT T1»E OF ABORT 

SAVE STACK POINTER VALUE 

SAVE CONTENTS Of KT STATUS REG. 0 

SAVE CONTENTS OF KT STATUS REG. 2 

CLEAR ERROR BITS IN STATUS REG 0 

UNEXPECTED TRAP OR ABORT TO LOC. 250 

MAKE FLAG NEGATIVE ONE FOR NEXT TIME 

PUT PC i PS OF TRAP ON S'ACK 

;RETURN FROM INTERRUPT OR ABORT. 



.THE NEXT LOCATIONS ARE RESERVED FOR ANY PERMANENT PATCHES: 
PATCH: .WORD 0.0.0,0,0.0.0.0.0.0,0,0.0.0.0.0,0.0.0.0,0,0.0.0.0,0.0.0.0.0 
.WORD 0.0.0.0.0.0.0,0.0.0.0,0.0,0.0.0.0.0.0,0.0.0.0.0.0.0.0.0.0.0 
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SEQUENCE 67 



2102 
2103 
2104 
2105 

2106 020000 



020000 
020004 
020006 
020012 
020014 

020020 
020026 
020034 
020042 
020050 
020056 
020064 
020072 
020100 
020106 
020112 



020222 
020226 
020234 
020242 
020250 
020256 

020260 
020262 
020266 
020270 
020276 
020304 
020310 
020314 



020000 



012706 
00502O 
022706 
001374 
012706 

012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
013737 
005037 
112737 



=20000 



STARTING POINT OF TEST 
STARTING ADDRESS OF 200 



001100 

001140 

001100 

003042 
000340 
003270 
000340 
007206 
000340 
007274 
000340 
036054 
001212 
000001 



000020 
000022 
000030 
000032 
000034 
000036 
000024 
000026 
036046 

001115 



START: 
.S8TTL 
;; CLEAR 

nov 

CLR 
C1P 
BNE 
MOV 

;; INITIALIZE 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
MOVB 

;; INITIALIZE 



INITIALIZE THE COMMON TAGS 
THE COMMON TAGS (SCMTAG) AREA 

mMTAG.R6 ;, -FIRST LOCATION TO BE CLEARED 
(R6)* ;; CLEAR MEMORY LOCATION 

#SWR.R6 ;;DONE? 

.-6 ;;LOOP BACK IF NO 

fSTACK.SP ; .-SETUP THE STACK POINTER 

FEW VECTORS 

#$SCOPE.a#IOTVEC ;;IOT VECTOR FOR SCOPE ROUTINE 
#340.a#IOTVEC*2 ; .'LEVEL 7 

«ERROR.a#EMTVEC ;;EMT VECTOR FOR ERROR ROUTINE 
#340.a#EMTVEC*2 ;;LEVEL 7 

#$TRAP.»#TRAPVEC ;;TRAP VECTOR FOR TRAP CALLS 
#340.a#TRAPVEC*2;LEVEL 7 
#$PWRDN,a#PWRVEC ;. -POWER FAILURE VECTOR 
.-LEVEL 7 

.-SETUP END-OF -PROGRAM COUNTER 
.-CLEAR THE ESCAPE ON ERROR ADDRESS 
.-ALLOW ONE ERROR PER TEST 



#340.a#PWRVEC^2 
$ENDCT,$E0PCT 
SESCAPE 
#1,$ERMAX 



020120 


012737 


036316 


000014 




MOV 


020126 


012737 


000340 


000016 




MOV 


020134 


012737 


000002 


036316 




MOV 


020142 


012737 


020170 


000010 




MOV 


020150 


005046 








CLR 


020152 


012746 


020160 






MOV 


020156 


000006 








RTT 


020160 


012737 


000006 


036316 


64$- 


MOV 


020166 


000402 








BR 


020170 


062706 


000010 




65$: 


ADD 


020174 


012737 


000012 


000010 


66$: 


MOV 


020202 


005037 


001310 






CLR 


020206 


012737 


020206 


001106 




MOV 


020214 


012737 


020214 


001110 




MOV 



THE "T-8IT" TRAP VECTOR. THEN LOAD LOCATION "$RTRN". 

THE 'tND-OF-PASS" ($EOP) ROUTINE. WITH A 'TRTI" OR "RlV. 

"T" BIT VECTOR TO $RTRN 
7 

TO A RTI 
A RTT 



IN 



#$RTRN.a#TBlTVEC 
#340.a#TBITVEC*2 
#RTI.$RTRN 
#65$,a#RESVEC 
-(SP) 
#64$, -(SP) 



#RTT.$RTRN 
66$ 

#10. SP 



.-.-SET 
.-.-LEVEL 
.-SET $RTRN 
.-TRY TO DO 
.-DUMMY PS 
.-AND PC 
.-TRY THE RTT 
;RTT IS LEGAL— SET 



$RTRN TO A RTT 



;;RTT ILLEGAL— CLEAN OFF THE STACK 



013746 
012737 
012737 
012737 
022777 
001012 

000403 
012716 
000002 
012737 
012737 
012637 
005037 
M2717 



000004 
020262 
177570 
177570 
^77777 



020270 

000176 
0001 74 
000004 
001232 
000200 



000004 
001140 
001142 
160662 



001140 
001142 



001245 



.-.-SIZE FOR A 
.-.-EQUAL TO A 
MOV 
MOV 
MOV 
MOV 
CMP 
BNE 



#RESVEC*2,a#RESVEC ..-RESTORE TRAP CATCHER 
ST8IT .-.-CLEAR "T" BIT SWITCH 

#.,$LPADR .-.-INITIALIZE THE LOOP ADDRESS FOR SCOPE 

#..$LPERR .-.-SETUP THE ERROR LOOP ADDRESS 

HAPDWAPE SWITCH REGISTER. IF NOT FOUND OR IT IS 
"-1". SETUP FOR A SOFTWARE SWITCH REGISTER. 



67$ 
68$ 
69$ 



BR 

MOV 

RTI 

MOV 

MOV 

MOV 

CLR 

BITS 



a#ERRVEC.-(SP) 
#67$.a#ERRVEC 
#DSWR.SWR 
#DDISP. DISPLAY 
#-1.aSWR 
69$ 

68$ 

#68$. (SP) 



.-SAVE ERROR VECTOR 
.-SET UP ERROR VECTOR 
.-SETUP FOR A HARDWARE SWICH REGISTER 
.-AND A HARDWARE DISPLAY REGISTER 
.-TRY TO REFERENCE HARDWARE SWR 
.-BRANCH IF NO TIMEOUT TRAP OCCURRED 
.-AND THE HARDWARE SWR IS NOT = -1 
.-BRANCH IF NO TIMEOUT 
.-SET UP FOR TRAP RETURN 

.-.-POINT TO SOFTWARE SWR 



#SWREG.SWR 
#DISPREG, DISPLAY 
(SP)*.a#ERRVEC .-.-RESTORE ERROR VECTOR 
$PASS .-.-CLEAR PASS COUNT 

#APTSIZE.$ENVM .-.-TEST USER SIZE UNDER 



APT 



LKKTBDO ME« MGHT PRT 8 
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SEQUtNCE 





020322 


001403 








BEG 


70$ 




020324 


012737 


001246 


001140 




nov 


#$SUREG,SWR 




020332 








70$: 




2107 










.SBTTL 


TYPE PROGRAH NAME 












.-.•TYPE 


THE NAME 


OF THE PROGRAM 




020332 


005227 


^77777 




INC 


#-1 




020336 


001047 








BNE 


71$ 




020340 


022737 


036252 


000042 




CMP 


#$ENDAD,a#42 




020346 


001443 








BEQ 


71$ 




020350 


104401 


020416 






TYPE 


.72% 












.SBTTL 


GET VALUE FOR SOFTWARE 




020354 


005737 


000042 






TST 


a«42 




020360 


001012 








BNE 


73$ 




020362 


123727 


001244 


000001 




CMPB 


$ENV,/iri 




020370 


001406 








BEO 


73$ 




020372 


023727 


001140 


000176 




CMP 


SUR,/irSUREG 




020400 


001005 








BNE 


74$ 




020402 


104407 








GTSUR 






020404 


000403 








BR 


74$ 




020406 


112737 


000001 


001134 


73$: 


MOVB 


#1,$AUT0B 




020414 








74$: 






020414 


000420 






;;72$: 


BR 

.ASCJZ 


71$ 

<CRLF>#CKKTBDO 




020456 








h$: 






2108 


020456 
020462 


104401 
000436 


020464 






TYPE 
BR 


,76$ 
?5$ 












;-76$: 


.ASCIZ 


#EOP MESSAGES 




020560 








H$: 




2109 


020560 








LOOP: 






2110 


020560 


012706 


001100 






MOV 


#STACK.KSP 


2111 


020564 


012737 


040000 


m77b 




MOV 


#40000, PSU 


2112 


020572 


012706 


000700 






MOV 


#SUPSTK,SSP 


2113 


020576 


012737 


140000 


y7777t> 




MOV 


#140000. PSW 


21U 


020604 


012706 


000600 






MOV 


#USESTK,USP 


2115 


020610 


005037 


}77776 






CLR 


PSU 


2116 


020614 


012737 


016070 


000004 




MOV 


#TJMERR.ERRVEC 


2117 020622 


012737 


000340 


000006 




MOV 


#340,ERRVEC*2 


2118 020630 


012737 


016142 


000250 




MOV 


#MGMERR,MMVEC 


2119 020636 


012737 


000340 


000252 




MOV 


#340.MHVEC+2 


2120 0206A4 


012700 


\77777 






MOV 


#-1.R0 


2121 


020650 


010037 


016072 






MOV 


RO,TJMFLG 


2122 


020654 


010037 


016144 






MOV 


RO.MGMFLG 


2123 


020660 


012737 


000340 


001274 




MOV 


#340. TBI TPS 


2124 


020666 


005037 


y77^72 




INIT: 


CLR 


MMRO 


2125 


020672 


012737 


000020 


172516 




MOV 


#BIT4,MMR3 


2126 


020700 


004737 


002060 






JSR 


PC.APRINIT 



;; YES. USE NON-APT SWITCH 
;;NO,USE APT SWITCH REGISTER 



IF FIRST PASS 
FIRST TIME? 
IBRANCH IF NO 
;ACT-11? 
; BRANCH IF YES 
TYPE ASCIZ STRING 
SWITCH REGISTER 

;ARE WE RUNNING UNDER XXDP/ACT? 
;BRANCH IF YES 
;ARE WE RUNNING UNDER APT? 
;8RANCH IF YES 

SOFTWARE SWITCH REG SELECTED? 
; BRANCH IF NO 
GET SOFT-SWK SETTINGS 

;;SET AUTO-MODE INDICATOR 



;;GET OVER THE ASCIZ 



;;TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 



INITIALIZE THE STACK POINTER 
TURN ON SUPERVISOR MODE 
INITIALIZE SUPER. STACK POINTER 
TURN ON USER MODE 
INITIALIZE USER STACK POINTER 
RETURN TO KERNAL MODE 

LOAD CPU SERVICE ROUTINE INTO TRAP VECTOR 

SET NEW PS TO PRIORITY LEVEL 7-KERNEL 

LOAD MEMORY HANAGENT ROUTINE INTO VECTOR 

SET NEW PS TO PRIORITY LEVEL 7-KERNEL 

PUT -1 INTO RO TO INITIALIZE FLAGS 

INITIALIZE CPU ERROR FLAG 

INITIALIZE MEMORY MANAGEMENT ERROR FLAG 

INITIALIZE LOG THAT HOLDS T-BIT PSW 

BE SURE MEM. M6MT IS OFF TO START WITH. 

BUT TURN ON 22-BIT ADDRESSING MODE 

JUMP TO PAR/PDR INIT ROUTINE 
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«ifOL)ENCE 6^ 



2128 
2' 29 
2130 
2131 
2132 
2133 
2134 
2135 
2136 
2157 
2138 
2139 
2U0 
2K1 



S8TTL GROUP 1 ACCESS CONTROL FIELD/SPECIAL ABORTS TESTS 



THE NEXT THREE (3) TESTS CAUSE HE«ORV MANAGEMENT FRRORS 

TO CHECK THE ABILUr OF STATUS REGISTER 0 TO RECORD KT 

ERRORS AND THE ABILITY OF STATUS REGISTER 2 TO LOCK UP THE 

VIRTUAL ADDR. OF THE INSTRUCTION THAT CAUSED THE ERROR. 

THE BITS OF SR2 ARE CHECKED AND BITS <15:13>. <6:5>. AND <3:0> 

ARE CHECKED IN SRO. SO THE SRO AND SR2 LOGIC AND THE 

KT ERROR LOGIC ARE CHECKED. 

******************************* ***•*•****•***•*•••*•**•*••**••• 
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SEQUENCE 



70 



2150 



2151 
2152 
2153 
21 5A 
2155 
2156 
2157 
2158 
2159 
2160 
2161 
2162 
2163 
216A 
2165 
2166 
2167 
2168 
2169 
2170 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2178 
2179 
2180 
2181 
2182 
2183 
21 8A 
2185 
2186 
2187 
2188 
2189 
2190 
2191 
2192 
2193 
219A 
2195 
2196 



020704 
020706 
020712 
020716 
020722 
020726 
020732 
020736 
020742 
020746 
020752 
020756 
020762 
020770 
020774 
021000 
021004 
021012 
021020 
021022 
021030 
021032 



021034 
021036 
021042 
021044 
021046 



021050 
021056 
021064 
021070 
021072 



021074 
021100 
021104 
021106 



000004 
012700 
010037 
010037 
010037 
010037 
010037 
010037 
012700 
012701 
012703 
012702 
012737 
010237 
010237 
010237 
012737 
012737 
005010 
013737 
005211 
104003 



000425 
062706 
005710 
001401 
104004 



013737 
013737 
020337 
001401 
104005 



012704 
020437 
001401 
104006 



000600 
172346 
172350 
172246 
172250 
1 77646 
177650 
060000 
100000 
100011 
077400 
021036 
172310 
172210 
177610 
021020 
000001 



000004 



021030 
001270 



S8TTL TEST # 1 - NON-RESIDENT ABORT TEST (ACF=0fc4) 
•**•*********•*****••**•**••*•*••••*****•***•***•**•••*******••• 

West i non-resident abort test (ACF=oi4) 

• this test checks the access control field (acf) comparator 

* logic by causing non-resident aborts in kernel, supervisor 

• and user modes. PDR 4 IS loaded with ACF'S = 0(4 AND 

* THEN physical ADDR. 60000 IS ACCESSED TO CAUSE THE ABORT. 
* 



TSTl 
1$: 



000250 2$: 



001110 
177572 



177776 001176 



3$: 
4$: 



5$: 



177572 001264 6$: 
177576 001270 
001264 



7$: 



SCOPE 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

CLR 

MOV 

INC 

ERROR 



BR 

ADD 

TST 

BEO 

ERROR 



MOV 
MOV 
CMP 
BEQ 
ERROR 



MOV 
CMP 
BEO 
ERROR 



#600, RO 

R0.KIPAR3 

R0.KIPAR4 

R0.SIPAR3 

R0,SIPAR4 

R0.UIPAR3 

R0,UIPAR4 

#60000, RO 

#1 00000. R1 

#10001 1.R3 

#77400, R2 

#5$,nMVEC 

R2,KIPDR4 

R2,SIPDR4 

R2,UIPDR4 

#3$.$LPERR 

#1,MMR0 

(RO) 

PSW.$TMP0 

(R1) 
♦3 



8$ 

#4.SP 

(RO) 

6$ 

♦4 



SRO,UASSRO 

SR2,UASSR2 

R3,WASSR0 

7$ 

♦5 



#4S,R4 

R4,UASSR2 

8$ 

♦6 



LOAD DATA FOR PAR'S INTO RO 
MAP KERNEL PAR'S 364 TO 12-16K 

MAP SUPERVISOR PAR'S 3i4 TO 12-16K 

MAP USER PAR'S 344 TO 12-16K 

LOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 

LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO R1 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R.. KERNEL. PG.4 

LOAD ACF=0 (NON-RESIDENT) PDR VALUE IN R2 

POINT MEM. MGMT. TRAP VECTOR TO 5$ BELOW 

LOAD ACF TEST VALUE INTO KIPDR4 

LOAD ACF TEST VALUE INTO SIPDR4 

LOAD ACF TEST VALUE INTO UIPDR4 

SET LOOP ON ERROR POINTER TO 3$ 

TURN ON MEMORY MANAGEMENT 

CLEAR PHYS. LOC. 60000 USING PDR3 

SAVE PSW IN CASE OF ERROR 

TRY TO REF. IT USING PDR4 - SHOULD TRAP TO 5$ 
MEM. M6MT. ABORT DID NOT OCCUR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 3$" = 000772 

BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 
RESTORE STACK POINTER 

DID INSTRUCTION GET ABORTED i NOT EXECUTE 
BRANCH IF YES 

INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 3$" = 000764 

READ STATUS REGISTER 0 

READ STATUS REGISTER 2 

DID SRO REPORT NON-RESIDENT ERROR CORRECTLY? 
BRANCH IF YES 

SRO DID NOT REPORT NON-RES. ERROR CORRECTLY 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 3$" = 000752 

LOAD R4 WITH WHAT SR2 SHOULD READ 

DID SR2 LOCKUP RIGHT VIRTUAL ADDR. (=4$)? 

BRANCH IF YES 

SR2 DID NOT LOCK VIRTUAL ADDR. OF NON-RES. ERROR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 



CKKTBOO 11/4^ M£« «G«T PRT B HACRO K1113 12-JAN 
TEST # 1 - NON-RESIDENT ABORT TEST (ACF=0&A) 

2197 

?198 021110 005037 177572 8$: CLR 

2199 0211 K 032737 UOOOO 001176 BIT 

2200 021122 001006 BNE 

2201 021124 012703 100151 MOV 

2202 021130 012737 UOOOO 177776 MOV 

2203 021136 000711 BR 

2204 021140 022737 040000 001176 11$: CMP 

2205 021146 001006 BNE 

2206 021150 012703 100051 MOV 

2207 021154 012737 040000 177776 MOV 

2208 021162 000677 BR 

2209 021164 022702 077404 9$: CMP 

2210 021170 001407 BEQ 

2211 021172 012702 077404 MOV 

2212 021176 012703 100011 MOV 

2213 021202 005037 Mmh CLR 

2214 021206 000665 BR 

2215 021210 005037 177776 10$: CLR 

2216 021214 012737 016142 000250 MOV 
2217 



G 6 

12:19 PAGE 60-1 



SEQUENCE 7' 



CVIRO 

*140000,$TMP0 
11$ 

#100151. 
#140000, 
2$ 

#40000, $TMPO 
9$ 

#100051. 
#40000 J 
2$ 

#77404. » 
10$ 

#77404 J 
#100011, 
PSU 
2$ 
PSU 

#MGMERR.HHVEC 



.R3 
I.PSW 



,R3 
,PSW 

,R2 

,R2 
.R3 



"BR 3$" = 000744 

TURN OFF MEMORY MANAGEMENT 

HAS ACF=0(4 BEEN TESTED IN USER YET 

BRANCH IF YES 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R., USER, PG.4 

GO TO UScR MODE 

REPEAT TEST IN USER MODE 

HAS ACF=014 BEEN TESTED IN SUPERVISOR YET 

BRANCH IF YES 

LOAD R3 WITH WHAT SRO SHOULD READ - N.R,, SUPERVISOR. PG.4 

GO TO SUPERVISOR MODE 

REPEAT TEST IN SUPERVISOR MODE 

HAS ACF=4 BEEN TESTED YET? 

BRANCH IF YES 

THEN LOAD ACF=4 (NON-RES) PDR VALUE IN R2 

LOAD R3 WITH WHAT SRO SHOULD READ-N.R. .KERNEL .PG. 4 

GO BACK TO KERNEL MODE 

60 BACK % TEST ACF=4 IN SAME MODE 

GO BACK TO KERNEL MODE BEFORE LEAVING 

RESTORE ADDRESS OF NORMAL MEMORY 

MANAGEMENT ERROR ROUTINE TO MMVEC 



CKKTBOO 11/44 hEM MGHT PRT B 
TEST • 2 - READ-ONLY ABORT TEST 

2226 



HACRO nl113 
(ACF=2) 



12-JAN-82 12; 19 PAGE 



H 

61 



SEQUENCE 7, 



.S8TTL TEST # 2 - READ-ONLY A80RT TEST (ACF=2) 



021222 
2221 m22i* 
2228 

2229 021224 

2230 021230 

2231 021 23A 

2232 021240 

2233 021244 
2254 021252 

2235 021256 

2236 021262 

2237 021266 

2238 021274 

2239 021300 
22A0 021302 

2241 021310 

2242 021312 
2243 

2244 
2245 

2246 021314 

2247 021316 

2248 021322 

2249 021324 

2250 021326 
2251 

2252 
2253 

2254 021330 

2255 021336 

2256 021344 

2257 021350 

2258 021352 
2259 

2260 
2261 

2262 021354 

2263 021360 

2264 021364 

2265 021366 
2266 

2267 
2268 

2269 021370 

2270 021374 

2271 021402 

2272 021404 



000004 



012700 
012701 
012703 
012702 
012737 
010237 
010237 
010237 
012737 
005237 
005010 
013737 
005211 
104003 



000425 
062706 
005710 
001401 
104004 



013737 
013737 
020337 
001401 
104005 



012704 
020437 
001401 
104006 



005037 
032737 
001006 
012703 



•TEST 2 
* 

* 



TST2: 
1$: 



060000 
100000 
020011 
077402 
021316 
172310 
172210 
177610 
021300 
177572 



000250 2S : 



001110 



177776 001176 



000004 



3$: 
4$: 



5$: 



177572 001264 
177576 001270 
001264 



021310 
001270 



6S: 



7$: 



177572 
140000 

020151 



001176 



8S: 



READ-ONLY ABORT TEST (ACF=2) 

THIS TEST CHECKS THE ACCESS CONTROL HELD (ACF) COMPARATOR 
LOGIC BY CAUSING READ-ONLY ABORTS IN KERNEL, SUPERVISOR AND 
USER MODES. PDR 4 IS LOAD WITH ACF =2 AND THEN 
PHYSICAL ADDR. 60000 IS WRITTEN TO CAUSE THE ABORT. 



SCOPE 



NOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
INC 
CLR 
MOV 
INC 
ERROR 



BR 

ADD 

TST 

BEQ 

ERROR 



MOV 
MOV 
CMP 
BEQ 
ERROR 



MOV 
CMP 
BEQ 
ERROR 



CLR 
BIT 
BNE 
MOV 



#60000-R0 

#100000, R1 

#2001 1.R3 

#77402, R2 

#5$.MMVEC 

R2,KIPDR4 

R2.SIPDR4 

R2-UJPDR4 

#3$.$LPERR 

MMRO 

(RO) 

PSW,$TMP0 

(R1) 
♦3 



8$ 

#4.SP 
(RO) 
6$ 
♦4 



SRO,UASSRO 

SR2,WASSR2 

R3,UASSR0 

7$ 

♦5 



#4$,R4 

R4,UASSR2 

8S 

♦6 



MMRO 

#1 40000, STHPO 
IIS 

#20151, R3 



KERNEL, SUPERVISOR AND USER PAR'S 3 t 4, 

AND PDR 3 ARE SETUP FROM LAST TEST 

LOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 

LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO Rl 

LOAD R3 WITH WHAT SRO SHOULD READ - R/O, KERNEL, PC. 

LOAD ACF=2 (READ-ONLY) PDR VALUE IN R2 

POINT MEM. M(JMT. TRAP VECTOR TO 5$ BELOW 

LOAD ACF=2 INTO KIPDR4 

LOAD ACF=2 INTO SIPDR4 

LOAD ACF=2 INTO UIPDR4 

SET LOOP ON ERROR POINTER TO 3$ 

TURN ON MEMORY MANAGEMENT 

CLEAR PHYS. LOC. 60000 USING PDR3 

SAVE PSW IN CASE OF ERROR 

TRY TO WRITE USING PDR4 - SHOULD TRAP TO 5$ 
MEM. MGMT. ABORT DID NOT OCCUR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 3$" = 000772 

BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 
RESTORE STACK POINTER 

DID INSTRUCTION GET ABORTED I NOT EXECUTE 
BRANCH IF YES 

INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 3$" = 000764 

READ STATUS REG. 0 

READ STATUS REG. 2 

DID SRO REPORT READ-ONLY ERROR CORRECTLY? 
BRANCH IF YES 

SRO DID NOT REPORT R/O ERROR CORRECTLY 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 3$" = 000752 

LOAD R4 WITH WHAT SR2 SHOULD READ 

DID SR2 LOCKUP RIGHT VIRTUAL ADDR. (=4S)? 

BRANCH IF YES 

SR2 DID NOT LOCKUP VIRTUAL ADDR. OF R/O ERROR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 3$" = 000744 

TURN OFF MEMORY MANAGEMENT 

HAS ACF=2 BEEN TESTED IN USER MODE? 

BRANCH IF YES 

LOAD R3 WITH WHAT SRO SHOULD READ-R/0. USER, PG.4 



CKKTBOO 11/44 NEH HGMT PRT B MACRO Hi 113 
TEST # 2 - READ-ONLY ABORT TEST (ACF=2) 



2273 
2274 



021410 
021416 

2275 021420 

2276 021426 

2277 021430 

2278 021434 

2279 021442 

2280 021444 

2281 021450 
2282 



012737 
000712 
022737 
001006 
012703 
012737 
000700 
005037 
012737 



140000 177776 
040000 001176 lU: 



020051 
040000 

177776 
016142 



177776 



000250 



9$: 



12-JAN-82 12:19 PAGE 



I 6 
61-1 



nov #1 40000. psw 

BR 2$ 

CW> #40000, STHPO 

BNE 9$ 

MOV #20051, R3 

nov #40000, PSW 

BR 2$ 

CLR PSW 

MOV #MGMERR,MHVEC 



SEQUENCE 73 



GO TO USER MODE 

REPEAT TEST IN USER MODE 

HAS ACF=2 BEEN TESTED IN SUPERVISOR MODE? 

BRANCH IF YES 

LOAD R3 WITH WHAT SRO SHOULD READ-R/0, SUPERVISOR. PG.4 

GO TO SUPERVISOR MODE 

REPEAT TEST IN SUPERVISOR MODE 

GO BACK TO KERNEL MODE BEFORE LEAVING 

RESTORE ADDRESS OF NORMAL MEMORY 

MANAGEMENT ERROR ROUTINE TO MMVEC. 



Ct^lcTBDO 11/44 ttE« MGMT PRT B 
TEST # 3 - TEST ILLEGAL MODE 

2294 



MACRO H1 113 
'10" 



12-JAN-82 12:19 PAGE 



J 

62 



SEQUENCE 74 



2295 

2296 

2297 

2298 

2299 

2300 

2301 

2302 

2303 

2304 

2305 

2306 

2307 

2308 

2309 

2310 

2311 

2312 

2313 

2314 

2315 

2316 

2317 

2318 

2319 

2320 

2321 

2322 

2323 

2324 

2325 

2326 



021456 
021460 
021466 
021474 
021502 
021510 

021512 
021520 
021522 
021530 
021536 
021542 
021550 
021552 
021556 
021 564 

021566 
021574 
021576 
021604 
021606 
021612 

021614 
021616 
021622 



000004 
012737 
012737 
012737 
012737 
104030 

012737 
000441 
013737 
012737 
012706 
022737 
001406 
012701 
013737 
104031 

022737 
001410 
022737 
001407 
012701 
104013 

000403 
012701 
104054 



021502 
021522 
000001 
100000 



177576 
016142 
001100 
100103 

100103 
177572 



021502 
021510 
021510 

021502 



S8TTL TEST # 3 - TEST ILLEGAL MODE "10" 



•TEST 3 



TEST ILLEGAL MODE "10" 



THIS TEST CHECKS TO SEE THAT A 10 IN THE CURRENT MODE BITS OF THE 
PSU WHILE MEMORY MANAGEMENT IS ON IS ILLEGAL. A 
MEMORY MANAGEMENT ABORT SHOULD OCCUR AND STATUS REGISTER 0 
SHOULD REPORT NON-RESIDENT ABORT. MODE =10, PAGE = 1 (100103). 
REGISTER 2 SHOULD cOCKUP THE ADDRESS OF THE INSTRUCTION 
THAT LOADED THE PSW IF M7095 ECO #8 IS MISSIGN. IF THE ECO IS 
INSTALLED. THE ADDRESS LOCKED UP WILL BE THAT OF THE UPDATED PC 



STATUS 



001110 
000250 
177572 
177776 



*** 

tST3: 
1$: 



10$: 
2$: 



016142 000250 



001270 
000250 

177572 

001264 

001270 
001270 



3$: 



4S: 



45S: 



021624 042737 160000 177572 5$: 



********* 

SCOPE 

MOV 

MOV 

MOV 

MOV 

ERROR 

MOV 

BR 

MOV 

MOV 

MOV 

CMP 

BEQ 

MOV 

MOV 

ERROR 

CMP 
BEQ 
CMP 
BEQ 
MOV 
ERROR 

BR 

MOV 

ERROR 



BIC 



************* **************************** ****•••*•• 



*10$.$LPERR 
#3$.MMVEC 
#1 -MMRO 
#100000, PSU 
♦30 



SET LOOP ON ERROR POINTER TO 10$ 
LOAD MEM. MGMT. TRAP VECTOR WITH 3$ 
TURN ON MEMORY MANAGEMENT 
SET 10 IN PSU CURRENT MODE BITS 
ILLEGAL MODE 10 NOT ABORTED 



;FOR A TIGHTER SCOPE LOOP. REPLACE ERROR CALL WITH 'BR 10$" = 000774 



*MGMERR.MMVEC 
5$ 

SR2.UASSR2 

/rMGMERR,MnVEC 

#KERSTK.SP 

*100103.SRO 

4$ 

#100103. R1 
SRO.UASSRO 
♦31 



RESTORE MEM. MGMT. ABORT VECTOR 
BRANCH AROUND SRO t SR2 CHECKS 
READ CONTENTS OF SR2 
RESTORE MEM. MGMT. ABORT VECTOR 
RESTORE STACK POINTER 
DID SRO REPORT ILLEGAL MODE CORRECTLY? 
BRANCH IF YES 

LOAD EXPECTED CONTENTS OR SRO INTO R1 
READ CONTENTS OF SRO 

SRO DID NOT REPORT NR ABORT, PG=1 . MODE=10 



;FOR TIGHTER SCOPE LOOP. REPLACE ERROR CALL WITH 'BR 10$" = 000746 



«10$.UASSR2 
45$ 

/r2$.UASSR2 
5$ 

*2$.R1 

♦ 13 



DID SR^ LOCKUP VIRT. ADDR OF ABORT ;DPM002 
BRANCH IF OK BUT NOT FOR ECO #8 ;DPM002 
DID SR2 LOCKUP VIRT. ADDR OF ABORT ;DPM002 
BRANCH IF ANSWER IS OK :DPM002 
MOVE ERROR ADDRESS TO R1 FOR ERROR CALL;DPM002 
SR2 DID NOT LOCKUP VIRT. ADDR. OF ILL. MODE INST. 



.FOR TIGHTER SCOPE LOOP, REPLACE ERROR CALL WITH 'BR 10$" = 000733 
5$ .-BRANCH OVER 2ND ERROR CALL 

*10$,R1 .-MOVE ADDRESS TO R1 FOR ERROR CALL ;DPM002 

♦54 ;SR2 LOCKED UP AN 11/34 COMPATIBLE ;DPM002 

.•ADDRESS THAT DOES NOT HAKE IT COMPA- ;DPM002 
.-TIBLE WITH AN 11/70 SINCE THE OPTIONAL ;DPM002 
;M7095 ECO *8 IS MISSING ;DPM002 

.-FOR TIGHTER SCOPE LOOP. REPLACE ERROR CALL WITH 'BR 10$'' - 000727 

#160000, SRO .-CLEAR POSSIBLE ERROR BITS IN SRO 



UKTBDO n/A4 HEM MGMT PRT B MACRO Ml 113 
TEST • 3 - TEST ILLEGAL MODE "lO" 



2327 
2328 
2329 
2330 
2331 
2332 
2333 
2334 
2335 
2336 
2337 
2338 
2339 
2340 
2341 
2342 



12-JAN-82 12:19 



K 6 
PAGE 63 



SEQUENCE 



THE NEXT JyO (2) TESTS WILL BE CHECKING THE PAGE LENGTH 
COMPARATORS AND SOME MORE OF THE KT ERROR DETECTION 
AND STATUS LOGIC. THE PAGE LENGTH FIELD (PLF) IN KERNEL 
POR 4 IS VARIED AND FOR EVERY PLF. THREE (3) VIRTUAL 
ADDRESSES ARE READ. WHILE USING BOTH UPWARD ft DOWNWARD PAGE 
EXPANSION, ONE OF THOSE THREE VIRTUAL ADDRESSES WILL CAUSE A 
"PAGE LENGTH ABORT" WHILE THE OTHER TWO WON'T. 

STATUS REGISTER 0 I 2 ARE CHECKED WHEN THE PAGE LENGTH 

ABORT DOES OCCUR TO SEE THAT THE ABORT IS REPORTED AND THAT 

THE VIRTUAL ADDRESS OF THE INSTRUCTION THAT CAUSED THE ABORT 
IS LOCKED UP. 



CKKT8D0 11 /4A ME« nWJ PRT B HACRO H^^^Z 12-JAN-82 12:19 
TEST « 4 - PAGE LENGTH FAULTS-UPWARD EXPANSION 



L 6 
PAGE 64 



SEQUENCE 



2354 



021632 

2355 021634 

2356 021642 

2357 021650 

2358 021654 

2359 021660 

2360 021666 

2361 021672 

2362 021700 

2363 021704 

2364 021706 

2365 021712 

2366 021720 

2367 021724 

2368 021726 

2369 021732 

2370 021736 

2371 021740 

2372 021746 

2373 021754 

2374 021756 
2375 

2376 
2377 

2378 021760 

2379 021762 

2380 021766 

2381 021774 

2382 022002 

2383 022006 

2384 022012 

2385 022014 
2386 

2387 
2388 

2389 022016 

2390 022022 

2391 022026 

2392 022030 
2393 

2394 
2395 

2396 022032 

2397 022040 



000004 
012737 
012737 
012700 
012704 
012737 
010437 
012737 
012706 
011001 
062700 
012737 
012706 
011001 
062700 
020027 
001470 
012737 
012737 
011001 
104010 



000424 
012706 
013737 
013737 
012702 
020237 
001401 
104011 



012703 
020337 
001401 
104012 



042737 
062704 



077406 
077406 
100000 
000406 
022052 
172310 
021700 
001100 

000100 
021720 
001100 

000100 
117700 

021754 
021762 



001100 
177572 
177576 
04001 1 
001264 



021754 
001270 



160000 
000400 



S8TTL TEST # 4 - PAGE LENGTH FAULTS-UPWARD EXPANSION 



*TEST 4 PAGF LENGTH FAULTS-UPWARD EXPANSION 

* 

* THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL PDR 4 

* FR0« 1 TO 177 AND FOR EACH PLF. THREE VIRTUAL ADDRESSES (VBA'S) 

* ARE ACCESSED. WHEN VBA <12:6> IS LESS THAN OR EQUAL TO PDR <14:8> 

* NO ABORT SHOULD OCCUR. WHEN VBA <12:6> IS GREATER THAN PDR <U:8>. 

* A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED Br SRO t SR2. 

* THE PAGE EXPANSION DIRECTION IN THIS TEST IS UPWARD. (THE ED BIT 

* (BIT 3) OF PDR 4=0). 
* 

************************************************************* 



1 72306 
172312 



000250 
001110 

001110 



001110 
000250 



*• 

TST4 
1$; 



2$: 
3$: 

4S: 



001264 
001270 



5$: 



6$: 



7$: 



177572 8$: 



SCOPE 

MOV #77406, KIPDR3 

MOV #77406.KIPDR5 

MOV #1 00000. RO 

MOV *406.R4 

MOV m.MMVEC 

MOV R4.KIPDR4 

MOV *3$.$LPE9R 

MOV #KERSTK.KSP 

MOV (RO).RI 

ADD #100, RO 

MOV #4$,$LPERR 

MOV #KERSTK,KSP 

MOV (R0;,R1 

ADD #100,R0 

CMP R0,#1 17700 

BEQ lOS 

MOV #5S,$LPERR 

MOV #6$,MMVEC 

MOV (R0),R1 

ERROR ^10 



BR 8$ 

MOV #<ERSTK,KSP 

MOV SRO^WASSRO 

MOV SR2,WASSR2 

MOV #4001 1,R2 

CMP R2,WASSR0 

BEO 7$ 

ERROR +1 1 



MOV #5$,R3 

CMP R3,WASSR2 

BEQ 8$ 

ERROR ^12 



BIG #160000, SRO 
ADD #400, R4 



MAKE SURE PDR3 IS DESCRIBED AS R/W 

MAKE SURE PDR5 IS DESCRIBED AS R/W 

LOAD VIRTUAL ADDR. TO SELECT PDR4 INTO RO 

LOAD FIRST PDR VALUE IN R4 (PLF=1, ACF=6) 

SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 

LOAD KIPDR4 WITH PAGE LENGTH VALUE 

SET LOOP ON ERROR POINTER TO 3$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR. (VBA < PLF - NO ABORT) 

FORM NEXT VIRTUAL ADDRESS IN RO 

SET LOOP ON ERROR POINTER TO 4$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR. (V8A=PLF - NO ABORT) 

FORM NEXT VIRTUAL ADDR IN RO 

HAVE ALL PLF'S BEEN TESTED YET? 

BRANCH IF ALL VBA'S ft PLF'S HAVE BEEN USED 

SET LOOP ON ERROR POINTER TO 5$ 

SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 

ACCESS VIRTUAL ADDR. (VBA > PLF - ABORT TO 6$) 

EXPECTED PAGE LENGTH ABORT DID NOT OCCUR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 5$" = 000776 

BRANCH AROUND ABORT CHECKS 

RESTORE STACK POINTER FOLLOWING ABORT 

READ M.M. STATUS REG. 0 

READ M.M. STATUS REG. 2 

PUT EXPECTED SRO CONTENTS IN R2 

DID SRO REPORT PG. LENGTH ABORT, PAGE 4. KERNEL? 

BRANCH IF YES 

SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 5$" = 000757 

PUT EXPECTED SR2 CONTENTS IN R3 

DID SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCTION 

BRANCH IF YES 

SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 5$" = 000751 

CLEAR ERROR BITS IN SRO 

FORM NEXT PLF VALUE FOR KIPDR4 



rnKTBDO men MGMT PRT B macro M1113 12-JAN-82 

TEST « 4 - PAGE LENGTH FAULTS-UPWARD EXPANSION 



2598 


A ^ 't A / / 

022044 


^ y ^ T A A 

162700 


AAA 4 A A 

000100 






SUB 


Unci 


A A r A 

022050 


AAA "TAI 

000703 








DO 

an 


-y/ Art 














2401 


022052 


012637 


A A 1 '^Z A 

001260 




y»: 


NOV 




A'^ ^ AC Z 

022056 


Ai '^Z T 7 

012637 


AA1 IX 1 

001 262 






MAI! 

MOV 


AT 


A'^ AX 

022062 


01 573^ 


1 77C 70 


AA1 OX/ 

UO 1 £64 




MAW 

nOV 


/ A y 


A'l A^A 

022070 


A 1 ■? 7 T 7 

01 3757 


1 77C 7X 

1 ff^ft 


AA1 '57A 
UOl ^70 




MAW 

nOv 


2405 


022076 


Ay ^ "7 T 7 

042737 


1 60000 






Oi I 


2406 


022104 


i Ay AA7 

104007 








CnROR 


2407 














2408 














2409 














2410 022106 




AAI 






nu» 


2411 


022 12 


013746 


001260 






MOV 


2412 


022116 


000002 








RTI 


2413 
2414 














022120 


012737 


016U2 


000250 


lOS: 


MOV 


2415 















M 6 

12:19 PAGE 64-1 



SEQUENCE 



#100. RO 
2$ 

(KSP)*,TRAPPC 
(KSP)*.TRAPPS 
SRO.WASSRO 
SR2.WASSR2 
#1 60000, SRO 
♦ 7 



TRAPPS,-(<SP) 
TRAPPC.-{KSP) 



fMGMERR.MMVEC 



FORM FIRST VIRT. ADDR FOR THAT PLF VALUE 
BRANCH BACK AND ACCESS 3 VBA'S FOR 
THE PLF VALUE JUST FORMED 
SAVE PC t PS OF TRAP 

SAVE CONTENTS OF SRO FOR ERROR 
SAVE CONTENTS OF SR2 FOR ERROR 
CLEAR ERROR BITS IN SRO 

GOT P6. LENGTH ABORT BEFORE IT WAS EXPECTED 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

A 'NOP" = 000240 

PUT PC ft PS OF TRAP ON STACK 

.•RETURN FROM UNEXPECTED ABORT 

.•RESTORE NORMAL M.M. TRAP HANDLER 
.-ADDRESS TO M.M. TRAP VECTOR 
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TEST « S - PAGE LENGTH FAULTS-DOWNWARD EXPANSION 



N 

65 



SEQUENCE 



2427 



.S8TTL TEST MS- PAGE LENGTH FAULTS-DOWNWARD EXPANSION 



;*TEST 5 PAGE LENGTH FAULTS-DOWNWARD EXPANSION 

THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL PDR4 
FROM 176 TO 0 AND FOR EACH PLF. THREE VIRTUAL ADDRESSES (VBA'S) 
ARE ACCESSED. WHEN VBA <12:6> IS GREATER THAN OR EQUAL TO PDR <14:8> 
NO PAGE ABORT SHOULD OCCUR. WHEN VBA <12:6> IS LESS THAN PDR <14:8> 
A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRC t SR2. 
THE PAGE EXPANSION DIRECTION IN THIS TEST IS DOWNWARD, (THE ED BIT 
(BIT 3) OF PDR4=1). 



;• 

• * 

• * 

9 

;* 
;* 



022126 

2428 022130 

2429 022134 

2430 022140 

2431 022146 

2432 022152 

2433 022160 

2434 022164 

2435 022166 

2436 022172 

2437 022200 

2438 022204 

2439 022206 

2440 022212 

2441 022216 

2442 022220 

2443 022226 

2444 022234 

2445 022236 
2446 

2447 
2448 

2449 022240 

2450 022242 

2451 022246 

2452 022254 

2453 022262 

2454 022266 

2455 022272 

2456 022274 
2457 

2458 
2459 

2460 022276 

2461 022302 

2462 022306 

2463 022310 
2464 

2465 
2466 

2467 022312 

2468 022320 

2469 022324 

2470 022330 



000004 
012700 
012704 
012737 
010437 
012737 
012706 
011001 
162700 
012737 
012706 
011001 
162700 
020027 
001470 
012737 
012737 
011001 
104010 



000424 
012706 
013737 
013737 
012702 
020237 
001401 
104011 



012703 
020337 
001401 
104012 



042737 
162704 
062700 
000703 



117700 
077016 
022332 
172310 
022160 
001100 

000100 
022200 
001100 

000100 
100000 

022234 
022242 



001100 
177572 
177576 
04001 1 
001264 



022234 
001270 



160000 
000400 
000100 



000250 
001110 

001110 



001110 
000250 



TST5: 
1$: 

2$: 



3$: 



4S: 



001264 
001270 



5$: 



6$: 



7$: 



177572 8$: 



SCOPE 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

sue 

MOV 
MOV 
MOV 
SUB 
CMP 
BEQ 
MOV 
MOV 
MOV 
ERROR 



BR 

MOV 

MOV 

MOV 

MOV 

CMP 

6E0 

ERROR 



MOV 
CMP 
BEQ 
ERROR 



BIC 

sue 

ADD 
BR 



#11 7700.ro 

#77016. R4 

m.MMVEC 

R4.KIPDR4 

#3$,$LPERR 

mRSTK.KSP 

(R0),R1 

#100, RO 

#4$,$LPERR 

#KERST)(,<SP 

(RO).RI 

#100. RO 

R0.A1 00000 

10$ 

#5$.$LPERR 
#6$.MMVEC 
(RO).Rl 
♦ 10 



8$ 

#KERSTK.»CSP 

SRO.WASSRO 

SR2,WASSR2 

#40011. R2 

R2.WASSR0 

7$ 

♦11 



#5$.R3 

R3.WASSR2 

8$ 

♦12 



#1 60000. SRO 
#400. R4 
#100, RO 
2$ 



LOAD VIRTUAL ADDR. TO SELECT PDR4 INTO RO 

LOAD FIRST PDR VALUE IN R4 (PLF=1 76,ACF=6) 

SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 

LOAD KIPDR4 WITH PAGE LENGTH VALUE 

SET LOOP ON ERROR POINTER TO 3$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR. (VBA > PLF - NO ABORT) 

FORM NEXT VIRTUAL ADDRESS IN RO 

SET LOOP ON ERROR POINTER TO 4$ 

MAKE SURE STACK POINTER IS ALL SET UP 

ACCESS VIRTUAL ADDR. (V8A=PLF - NO ABORT) 

FORM NEXT VIRTUAL ADDR. IN RO 

HAVE ALL PLF'S BEEN TESTED YET? 

BRANCH IF ALL VBA'S i PLF'S HAVE BEEN USED 

SET LOOP ON ERROR POINTER TO 5$ 

SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 

ACCESS VIRTUAL ADDR. (VBA < PLF - ABORT TO 6$) 

EXPECTED PAGE LENGTH ABORT DID NOT OCCUR 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 5$" = 000776 

BRANCH AROUND ABORT CHECKS 

RESTORE STACK POINTER FOLLOWING ABORT 

READ M.M. STATUS REG. 0 

READ M.M. STATUS REG. 2 

PUT EXPECTED SRO CONTENTS IN R2 

DID SRO REPORT PG. LENGTH ABORT, PG. 4, KERNEL? 

BRANCH IF YES 

SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

*BR 5$" = 000757 

PUT EXPECTED SR2 CONTENTS IN R3 

DID SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCTION 

BRANCH IF YES 

SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

*BR 5$" = 000751 

CLEAR ERROR BITS IN SRO 

FORM NEXT PLF VALUE FOR KIPDR4 

FORM FIRST VIRT. ADDR. FOR THAT PLF VALUE 

BRANCH BACK AND ACCESS 3 VBA'S FOR 



B 
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TEST t S - PAGE LENGTH F AULTS-DOyNWARD EXPANSION 



2471 
















24 7^ 


022332 




AA1 "^^A 




y»: 


HOV 


(KSP; ♦ , TKAPPC 


24 75 


022336 


A1 '5^ T 7 

01 db5f 


00 1 dbc 








vK5r> ♦ , THAPrS 


2474 


022342 


rtl 1717 


1 77C 7'5 


AA 1 "^^y 
00 V64 






CDA UACCDA 

SHO.WASSKO 


2475 


022350 


rtl T 71 7 

\Ji 5'i' 


1 77C 7it 


00 I i ^0 








r476 022356 


ft/ 5717 


1 ^AAAA 

160000 


1 77C 7^ 




61 C 


JIIXni^AA CDA 

• 1 60000, 5kO 


^477 
2478 


022364 


4 Ay AA7 








CnNUN 


♦ 7 
















2479 
















2480 
















2481 


022366 




AAI 






nUV 




2482 


022372 


013746 


001260 






NOV 


TRAPPC.-(ICSP) 


2483 


022376 


000002 








RTJ 


2484 
















2485 


022400 


012737 


016142 


000250 


10$: 


NOV 


#MG«ERR,WVEC 


2486 















;THE PLF VAlUE JUST FQW^D 
;SA^E PC t PS OF TRAP 

.•SAVE CONTENTS OF SRO FOR ERROR 
.SAVE CONTENi'S OF SR2 FOR ERROR 
.CLEAR ERROR BJTS IN SRO 

.•GOT P6. LENGTH ABORT BEFORE IT WAS EXPECTED 

;FOR TIGHTER SCOPE LOOP 

.•REPLACE ERROR CALL WITH 

.•A 'NOP" = 000240 

;PUT PC t PS OF TRAP ON STACK 

.-RETURN FROM UNEXPECTED ABORT 

.•RESTORE NORWAL TRAP HANDLER 

.•ADDRESS TO TRAP VECTOR 
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TEST # 6 - SR2 BIT TEST 

2500 



B 



C 7 
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SEQUENCE 



022A06 

2501 022A10 

2502 022416 

2503 02242A 
250A 022432 

2505 022440 

2506 022444 

2507 022450 

2508 022456 

2509 022464 

2510 022470 

2511 022472 

2512 022476 

2513 022502 

2514 022504 

2515 022510 

2516 022516 

2517 022522 

2518 022524 
2519 

2520 
2521 

2522 022526 

2523 022534 

2524 022540 

2525 022544 

2526 022550 
2527 

2528 022552 

2529 022560 
2530 



000004 
012737 
012737 
012737 
012737 
012700 
012701 
012737 
012737 
012720 
005020 
012720 
012710 
010107 
012706 
013737 
020137 
001401 
104013 



042737 
162700 
062701 
020127 
103745 

012737 
012737 



000600 
000600 
077406 
077402 
060000 
100000 
022504 
022464 
010727 

000137 
022504 

001100 
177576 
001270 



160000 
000004 
000002 
111002 



077406 
01614? 



S8TTL TEST # 6 - SR2 BIT TEST 
'test 6 SR2 BIT TEST 



172346 
172350 
172306 
172310 



000250 
001110 



TST6: 
1$: 



001270 



2$: 



3$: 



177572 4$: 



172310 
000250 



5$: 



THIS TEST CHECKS THE BITS IN MEMORV MANAGEMENT REGISTCR 2 BY 
CAUSING "READ-ONLY ABORTS" AT VIRTUAL ADDRESSES BETWEEN 100000 
TO 111000 (PHYSICAL ADDRESSES 060000-071000). KIPDR4 IS USED TO EXECUTE 
THE FOLLOWING FOUR WORDS OF CODE WHICH ARE MOVED THRU MEMORY: 
010727 MOV PC. (PC)* .-THIS INSTRUCTION SHOULD CAUSE A R/0 ABORT 
000000 ;ITS VIRTUAL ADDR. SHOULD BE LOCKED UP IN SR2 

000137 JMP 8*3$ ;THIS INSTRUCTION IS ALSO MOVED THRU MEMORY 
(ADDR. OF 3$) ;IN CASE A R/0 ABORT DOES NOT OCCUR. 

;IN WHICH CASE SR2 WILL NOT CONTAIN CORRECT ADDR. 



SCOPE 

MOV #600,KIPAR3 

MOV *600,KIPAR4 

MOV *77406.KIPDR3 

MOV *77402.KIPDR4 

MOV #60000-R0 

MOV #1 00000, R1 

MOV #3$.MMVEC 

MOV #2$-$LPERR 

MOV #010727. (RO)* 

CLR (RO)* 

MOV #000137, (R0)+ 

MOV #3f.(R0) 

MOV R1.PC 

MOV #KERST)(,KSP 

MOV SR2,WASSR2 

CMP R1,WASSR2 

BEO 4$ 

ERROR +13 



BIC #1 60000, SRO 

SUB «4,R0 

ADD #2,R1 

CMP R1, #11 1002 

6L0 2S 

MOV #77406,tCIPDR4 

MOV #«G«ERR,MMVEC 



BE SURE PAR3 IS MAPPED TO 12-16IC 

BE SURE PAR4 IS MAPPED TO 12-16IC 

MAP PAGE 3 128 BLOCKS, R/W 

MAP PAGE 4 128 BLOCKS. READ-ONLY 

LOAD RO WITH VIRTUAL ADDR. WHICH USES PDR3 

LOAD R1 WITH VIRTUAL ADDR. WHICH USES PDR4 

SET M.M. TRAP VECTOR TO 3$ 

SET LOOP ON ERROR POINTER TO 2$ 

LOAD 'WOV PC, (PC)*" INSTRUCTION AT ADDR. 

REACHED THRU PDR/PAR 4. 
LOAD "JMP a#3$" INSTRUCTION AT VIRT. ADDR. 

IN CASE R/O VIOL. DOES NOT ABORT 
TRANSFER PROGRAM EXECUTION TO 'T'AGE 4 INSTRUCTIONS' 
RESTORE STACK POINTER 
READ CONTENTS OF STATUS REG 2 
WAS ADDR. OF 'I^ELOCATED - R/0 ABORT" LOCKED UP? 
BRANCH IF YES 

SR2 DID NOT LOCK UP VIRTUAL ADDR. OF R/0 VIOL. 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 2$" = 000757 

CLEAR THE ERROR BITS IN SRO 

RESET RO TO POINT TO NEXT VIRT. ADDR. TO LOAD 

FORM VIRTUAL ADDR. THAT SHOULD BE LOCKED UP NEXT 

HAVE ALL VBA'S 100000-111000 BEEN TESTED? 

BRANCH IF NO 

RESTORE PDR4 TO R/U ACCESS 
RESTORE ADDRESS OF NORMAL M.M. 
TRAP HANDLER TO M.M. VECTOR 



D 7 
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TEST • 7 - NOPE CHECKS OF SRO I SR2 



SEOUfA^CE 81 



2544 



S8TTL TEST * 7 - MORE CHECKS OF SRO t SR2 



022566 


000004 






TST7: 


SCOPE 




2545 022570 


012737 


000600 


172352 


1$; 


MOV 


*600.»(IPAR5 


2546 022576 


012737 


000406 


172310 




MOV 


*406,KIPDR4 


2547 022604 


012737 


077402 


172312 




MOV 


#77402, KIPDR5 


2548 022612 


012737 


022620 


001110 




MOV 


#2S.$LPERR 


2549 022620 


013737 


177576 


001270 


2$: 


MOV 


SR2,UASSR2 


2550 022626 


012701 


022620 






MOV 


#2$.R1 


2551 022632 


020137 


001270 






CMP 


Rl ,WASSR2 


2552 022636 


001401 








BEO 


3$ 


2553 022640 


104016 








ERROR 


♦16 


2554 














2555 














2556 














2557 022642 


012737 


022650 


001110 


3$: 


MOV 


«4$,$LPERR 


2558 022650 


013737 


177576 


001270 


4$: 


MOV 


SR2,WASSR2 


2559 022656 


012701 


022650 






MOV 


#4$,R1 


2560 022662 


020137 


001270 






CMP 


Rl ,WASSR2 


2561 022666 


001401 








BEQ 


5$ 


2562 022670 


104016 








ERROR 


♦16 


2563 














2564 














2565 














2566 022672 


012737 


022700 


001110 


5S; 


MOV 


#6$.SLPERR 


2567 022700 


012737 


022716 


000250 


6$: 


MOV 


#7$,«MVEC 


2568 022706 


005037 


001200 






CLR 


STMP1 


2569 022712 


005237 


100500 






INC 


a#l 00500 


2570 022716 


012706 


001100 




7$: 


MOV 


#KERSTK,KSP 


2571 022722 


013737 


177572 


001176 




MOV 


SRO.$TMPO 


2572 022730 


013737 


177576 


001202 




MOV 


SR2.$TMP2 


2573 022736 


012737 


022750 


000250 




MOV 


#8$-MMVEC 


2574 022744 


005237 


120000 






INC 


WI^OOOO 


2575 022750 


012706 


001100 




8$: 


MOV 


#KERSTK.KSP 


2576 022754 


013737 


177572 
177576 
001176 


001264 




MOV 


SRO.UASSRO 


2577 022762 


013737 


001270 




MOV 


SR2.WASSR2 


2578 022770 


023737 


001264 




CMP 


$TMPO,UASSRO 


2579 022776 


001402 








BEQ 


9$ 


2580 023000 


005237 


001200 






INC 


STMPl 


2581 023004 


023737 


001202 


001270 


9$: 


CMP 


$T«P2.UASSR2 


2582 023012 


001402 








BEQ 


10$ 


2583 023014 


005237 


001200 






INC 


$TMP1 


2584 023020 


005737 


001200 




10$: 


TST 


$TMP1 


2585 023024 


001401 








BEQ 


11$ 



*TEST 7 MORE CHECKS OF SRO t SR2 

• 

• THIS TEST PERFORMS SOME ADDITIONAL CHECKS OF THE SRO ( SR2 LOGIC. 

• FIRST IT CHECKS THAT SR2 "TRACKS" ALONG ACTING AS A VIRTUAL ADDRESS 

• PROGRAM COUNTER. ALSO SRO I SR2 ARE LOCKED UP BY A PAGE LENGTH 

• ABORT. THEN WITHOUT CLEARING SRO'S ERROR BITS, A R/O ABORT IS CAUSED. 

• SRO t SR2 SHOULD NOT BE CHANGED BY THE SECOND ABORT AND THE 

• INFORMATION ABOUT THE PAGE LENGTH ABORT SOULD STILL BE LOCKED UP. 

• IN ADDITION A "RESET" IS EXECUTED TO VERIFY THAT SRO IS CLEARED 

• AND SR2 IS UNLOCKED BY A RESET. AFTER MEMORY MANAGEMENT IS TURNED BACK ON, 

• SR2 IS CHECKED TO SEE THAT IT IS TRACKING AGAIN. 
* 

■A************************************************************** 

MAP KERNEL PAGE 5 TO 12-16^ 
SETUP PDR4 FOR PAGE LENGTH ABORT 
SETUP PDR5 FOR R/O ABORT 
SET LOOP ON ERROR POINTER TO 2$ 
READ SR2 TO SEE IF ITS TRACKING 
PUT EXPECTED VIRTUAL PC IN Rl 
DID SR2 CONTAIN VIRTUAL PC AT 2$? 
BRANCH IF YES 
SR2 NOT TRACKING CORRECTLY 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 2$" = 000767 
SET LOOP ON ERROR POINTER TO 4$ 
READ SR2 TO SEE IF ITS TRACKING 
PUT EXPECTED VIRTUAL PC IN Rl 
DID SR2 CONTAIN VIRTUAL PC AT 4$ 
BRANCH IF YES 
SR2 NOT TRACKING CORRECTLY 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 4$" = 000767 
SET LOOP ON ERROR POINTER TO 6$ 
PUT ADDRESS OF 7$ IN M.M. TRAP VECTOR 
CLEAR ERROR INDICATOR 
CAUSE PAGE LENGTH ABORT - TRAP TO 7$ 
RESTORE STACK POINTER AFTER ABORT 
SAVE SRO'S INFORMATION ON PG. LGTH. ABORT 
SAVE SR2'S INFORMATION ON PG. LGTH. ABORT 
PUT ADDRESS OF 8$ IN M.M. TRAP VECTOR 
CAUSE R/O ABORT - TRAP TO 8$ 
RESTORE STACK POINTER AFTER ABORT 
READ SRO FULLWOING SECOND KT ABORT 
READ SR2 FOLLOWING SECOND KT ABORT 
IS SRO STILL HOLDING INFO ON FIRST ABORT? 
BRANCH IF YES 
SET ERROR INDICATOR 

DOES SR2 STILL HOLD PC OF FIRST ABORT? 
BRANCH IF YES 
SET ERROR INDICATOR 

WERE SRO OR SR2 CHANGED BY A SECOND ABORT? 
BRANCH IF NO 
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2586 
2587 
2588 


023026 


104014 
















2589 








2590 


023030 


005037 


001200 


2591 


025034 


000005 




2592 


023036 


013737 


177572 


2593 


023044 


005737 


001264 


2594, 


023050 


001402 




2595 


023052 


005237 


001200 


^596 


023056 


013737 


177576 


2597 


023064 


022737 


023056 


2598 


023072 


001402 




2599 


023074 


005237 


001200 


2600 


023100 


005737 


001200 


2601 


023104 


0C1401 




2602 


023106 


104015 




2603 








260A 








2605 








2606 023110 


005237 


177572 


2607 


023114 


013737 


177576 


2608 


023122 


012701 


023114 


2609 023726 


020137 


001270 


2610 023132 


001401 




2611 


023134 


104016 




2612 








2613 








26U 








2615 


023136 


012737 


077406 


2616 


023144 


012737 


077406 


2617 023152 


012737 


016142 


2618 









lis 



001264 



001270 12$ 
001270 



13$ 



US 

001270 15$ 



172310 16$ 

172312 

000250 



E 7 

2:19 PAGE 67-1 



SEQUENCE 



♦ 14 



$T«P1 

SRO.UASSRO 
WASSRO 
12$ 
$T«P1 

SR2,UASSR2 

/irl2$,WASSR2 

13$ 

STMPl 

$TMP1 

14$ 

♦ 15 



SRO 

SR2-yASSR2 

*15$,R1 

Rl.yASSR2 

16i 

♦16 



#77406, KIPDR4 
#77406. KIPDR5 

#nGnERR,nnvEC 



ONE OF STATUS REGS. CHANGED Br SECOND ABORT 

"^OR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 6$" = 000726 

CLEAR ERROR INDICATOR 

EXECUTE A RESET. APPLYING AN "INIT" 

READ SRO 

WAS SRO CLEARED Br THE RESET? 
BRANCH IF YES 
SRO NOT CLEARED BY A RESET 
READ SR2 

WAS SR2 UNLOCKED BY A RESET? 
BRANCH IF YES 

SR2 NOT UNLOCKED BY A RESET 

WERE SRO I SR2 BOTH "IJESET" BY A RESET? 

BRANCH IF YES 

SRO OR SR2 NOT "RESET" BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 6$" = 000676 

TURN MEMORY MANAGEMENT BACK ON 

READ SR2 TO SEE IF ITS TRACKING AGAIN 

PUT EXPECTED VIRTUAL PC IN Rl 

DID SR2 CONTAIN VIRTUAL PC AT 15$ 

BRANCH IF YES 

SR2 NOT TRACKING CORRECTLY 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

"BR 6$" = 000663 

RESET P0R4 TO 128 BLKS. R/W 

RESET PDR5 TO 128 BLKS. R/W 

RESTORE ADDRESS OF NORMAL MEMORY 

MANAGEMENT TRAP ROUTINE TO M.M. VECTOR 
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TEST t 10 - SUPER/USER ABORT 

2632 



MACRO «ni3 12-JAN- 
PICKS UP KERNEL VECTOR 



82 12:19 PAGE 



f 

68 



SEQUENCE 



023160 
2633 023162 
263A 023166 

2635 023174 

2636 023200 
2637 

2638 
2639 

26A0 02320A 

2641 023212 

2642 023220 

2643 023226 

2644 023234 

2645 023240 

2646 023246 

2647 023254 
2648 

2649 

2650 023260 

2651 023264 

2652 023266 

2653 023272 
2654 

2655 
2656 

2657 023274 

2658 023300 

2659 023304 

2660 023310 

2661 023316 

2662 023322 
2663 

2664 
2665 

2666 023326 

2667 023354 

2668 023342 

2669 023350 

2670 023356 

2671 023362 

2672 023370 

2673 023376 



000004 
004737 
012737 
005037 
012706 



012737 
012737 
012737 
012737 
012706 
012737 
012737 
005737 



013701 
010602 
005037 
104017 



005037 
012706 
005037 
012737 
012706 
005037 



012737 
012737 
012737 
012737 
012706 
012737 
012737 
005737 



002356 
023174 
177776 
001100 



000600 
023274 
000340 
140000 
000600 
023260 
000340 
023261 



1 7777b 
M777b 



U7776 
001100 
177640 
140000 
000600 
177776 



000600 
023416 
000340 
040000 
000700 
023402 
000340 
023403 



S8TTL TEST * 10 - SUPER/USER ASORT PICKS UP KERNEL VECTOR 



•TEST 10 



SUPER/USER ABORT PICKS UP KERNEL VECTOR 



001110 



177640 
000004 
000006 
}77776 

000004 
000006 



THIS TEST CHECKS TO BE SURE THAT WHEN AN ABORT OCCURS WHILE 
IN SUPERVISOR OR USER MODE. THE TRAP VECTOR INFORMATION 
FETCHED IS TAKEN FROM KERNEL SPACE. USER PAGE 0 iS MAPPED 
TO 12K (60000-77776) SO THAT IF USER SPACE IS USED INSTEAD 
OF KERNEL. THE NEW PC THAT WAS LOADED AT LOC. 060004 IS USED 
INSTEAD OF THE NEW PC THAT SHOULD BE PICKED UP FROM LOC. 000004, 
THE SUPERVISOR PAGE 0 IS THEN MAPPED TO 12K. AND THE TEST 
IS REPEATED FOR SUPERVISOR MODE. AN ODD ADDRESS ERROR IS 
USED TO CAUSE A TRAP TO "4". 

*************************************************************** 

TURN OFF T-8IT TRAPPING FOR THIS TEST 
SET LOOP ON ERROR POINTER TO 2$ 
GO TO KERNEL MODE 
SETUP KERNEL STACK PTR. 



tSTIO: 


SCOPE 




1$: 


JSR 


PC. TOFF 




MOV 


*2$,$LPERR 


2$: 


CLR 


PSU 




MOV 


#KERSTK.KSP 


; • 
; • 
• • 


TEST 


USER MODE ABORT 



3$: 



4S: 



177776 



172240 
000004 
000006 
177776 

000004 
000006 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
TST 



MOV 
MOV 
CLR 
ERROR 



CLR 
MOV 
CLR 
MOV 
MOV 
CLR 



*600.UIPAR0 

«4$.»r4 
#340.air6 

#140000, PSW 
*USESTK,USP 

#3$.a#4 

#340,a#6 
3$*1 



psy,Ri 

SP.R2 

PSU 

♦17 



PSU 

#KERSTK,KSP 

UIPARO 

*1 40000. PSU 

#USESTK,USP 

PSU 



MAP USER PAGE 0 TO 12K 

LOAD KERNEL VECTOR 4 (L0C.4} UITH 4S 

LOAD VECT0R*2 UITH NEU PSU 

GO TO USER MODE 

SETUP USER STACK PTR. 

LOAD USER VECTOR 4 (LOC. 60004) UITH 3$ 

LOAD VECTOR+2 UITH NEU PSU 

CAUSE ODD ADDR. ERROR TRAP TO "4" 

SHOULD PICK UP NEU PC=4$ FROM KERNEL 

LOC. 4. NOT PC=3$ FROM USER LOC. 4 (=60004) 

SAVE PSU FOR ERROR 

SAVE VALUE OF STACK POINTER FOR ERROR 

BE SURE BACK IN KERNEL NODE 

DID NOT TRAP THRU KERNEL SPACE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 2$" = 000740 

BE SURE BACK IN KERNEL MODE 

RESTORE KERNEL S.P. IN CASE IT CHANGED 

REMAP USER PAGE 0 TO 0-4K 

GO TO USER MODE 

RESTORE USER STACK POINTER 

GO BACK TO KERNAL MODE 



NOU TEST THE SUPERVISOR MODE ABORT 



MOV *600.SIPAR0 

MOV #6$.af4 

MOV f340.a#6 

MOV «40000,PSU 

MOV #SUPSTK.SSP 

MOV #5$.a#4 

MOV *340,a#6 

TST 5$*1 



MAP SUPERVISOR PAGE 0 TO 12K 
LOAD KERNAL VECTOR 4 UITH 6$ 
LOAD VECTOR+2 UITH NEU PSU 
GO TO SUPERVISOR MODE 
SETUP SUPERVISOR STACK PTR. 

LOAD SUPERVISOR VECTOR 4 (LOC. 60004) WITH 5$ 

LOAD VECTOR+2 UITH NEU PSU 

CAUSE ODD ADDR. ERROR TRAP TO "4" 



(<ICTB00 MEM MGHT PRT B MACRO 

lEST » 10 - SUPER/USER ABORT PICKS UP 



2674 

?675 

2676 023<.02 

2677 023406 

2678 023A10 

2679 0234U 
2680 

2681 
2682 

2683 023416 

2684 023422 

2685 023426 

2686 023432 

2687 023440 

2688 023444 

2689 023450 

2690 023456 



013701 
010602 
005037 
104017 



005037 
012706 
005037 
012737 
012706 
005037 
0127^7 
004737 



177776 
177776 



177776 
001100 
172240 
040000 
000700 
177776 
016070 
002412 



Mni3 
KERNEL 



5S: 



6$: 



177776 



000004 



12-JAN-82 
VECTOP 



MOV 
MOV 

CLR 
ERROR 



CLR 
MOV 
CLR 
MOV 
MOV 
CLR 
MOV 
JSR 



G 

68 



12:19 PAGE 



PSW.R1 
SP,R2 
PSW 
♦ 17 



PSW 

#KERSTK,)CSP 
SIPARO 
#40000. PSW 
*SUPSTK,SSP 
PSW 

#TIMERR,a*4 
PC. TON 



SEQUENCE 



SHOULD PICK UP NEW PC=6f FROM KERNEL 

.OC. 4, NOT PC=5$ FROM SUPERVISOR LOC. 4 (=60004) 

SAVE PSW FOR ERROR 

SAVE VALUE OF STACK POINTER FOR ERROR 
BE SURE BACK IN KERNEL MODE 
DID NOT TRAP THRU KERNEL SPACE 
FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;'BR 2$" = 000740 
;BE SURE BACK IN KERNEL MODE 
;REST0RE KERNEL S.P. IN CASE IT CHANGED 
; REMAP SUPERVISOR PAGE 0 TO 0-4K 
;G0 TO SUPERVISOR MODE 
;RESTORE SUPERVISOR STACK POINTER 
;G0 BACK TO KERNEL MODE 

; RE STORE ADDR. OF NORMAL CPU TRAP HANDLER TO 4 
;TURN T-8IT TRAPPING BACK ON 



CKKTBDO 11 /4A HEM MGMT PRT B 
TEST #11 - RTl IN SUPER/USER 

2697 



MACRO Hill 3 
NODE DOES NOT 



12-JAN-82 
CHANGE PSW 



12:19 PAGE 



H 

69 



SEQUENCE 



S8TTL TEST #11 - RTI IN SUPER/USER MODE DOES NOT CHANGE PSW 
RTI IN SUPER/USER MODE DOES NOT CHANGE PSW 



•TEST n 

• THIS TEST CHECKS TO SEE THAT WHEN AN RTI IS EXECUTED IN SUPERVISOR 

• OR USER MODE, THE MODE OR PRIORITY BITS OF THE PSW ARE NOT CHANGED. 



023A62 


000004 




« 2* V 4 4 

TSTll : 


SCOPE 


2698 










2699 02346A 


012737 


023476 001110 


1$: 


MOV 


2700 023^72 


012702 


1 70000 




MOV 


2701 023476 


010237 


1 77776 


2t: 


MOV 


2702 023502 


012746 


A A A ^ y A 

000340 




MOV 


2703 023506 


012746 


023514 




MOV 










O T T 

K 1 i 


2705 0235U 


013701 


177776 


3$: 


MOV 


2706 023520 


042701 


007437 




BIG 


2707 023524 


005037 


177776 




CLR 


2708 023530 


020201 






CMP 


2709 023532 


001401 






BEO 


2710 023534 


104032 






ERROR 


2711 










2712 










2713 










2714 023536 


022702 


050000 


4$: 


CMP 


2715 023542 


001403 






BEO 


2716 023544 


012702 


050000 




MOV 


2717 023550 


000752 






BR 



#2$.$LPERR 

#1 70000. R2 
R2.PSW 
#340. -(SP) 
#3$.-(SP) 

PSW.Rl 

#7437. R1 

PSW 

R2.R1 

4$ 

♦32 



#50000. R2 
TST12 
#50000. R2 
2$ 



SET LOOP ON ERROR POINTER TO 2S 

LOAD "PRESENT i EXPECTED" PSW VALUE INTO R2 

GO TO PRESENT MODE-PRIORITY 0 

PUT A NEW PSW (PRIORI TY=7) ON STACK 

PUT NEW PC ON THE STACK 

DO AN RTI FROM PRESENT MODE 

READ NEW PSW INTO R1 

MASK OFF COND. CODE, T-8IT. AND UNUSED BITS 
GO BACK TO KERNEL MODE 

DID PSW STAY IN PRESENT MODE. PRIORITY=0? 
BRANCH IF YES 

PSW CHANGED BY AN RTI FROM USER 
FOR A TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR=2$" = 000760 

IF SUPERVISOR MODE HAS BEEN CHECKED, 

;60 TO NEXT TEST 

ELSE. SET SUPERVISOR MODE. 

AND BRANCH BACK TO TEST IT. 



CICKTBDO MEM MGMT PRT B MACRO Ml 113 12-JAN-82 12:19 PAGE 

TEST « 12 - KT ERROR NOT SERVICED IF ODD ADDR. ERROR 



I 

70 



SEOUENCF 



2729 



023552 

2730 023554 

2731 023562 

2732 023566 

2733 023572 
273A 023600 

2735 023606 

2736 0236U 

2737 023620 
2738 

2739 
2740 

27A1 023622 

2742 023626 

2743 023632 

2744 023640 

2745 023646 

2746 023652 

2747 023656 

2748 023660 

2749 023664 

2750 023670 

2751 023674 

2752 023676 

2753 023702 

2754 023706 

2755 023710 
2756 

2757 
2758 

2759 023712 

2760 023720 

2761 023726 

2762 023734 



000004 
012737 
012705 
010537 
012737 
012737 
012737 
005237 
104020 



012706 
005037 
013737 
013737 
012700 
020037 
001402 
005237 
012701 
020137 
001402 
005237 
005737 
001404 
104021 



042737 
012737 
012737 
012737 



001200 
023640 
001270 

001200 
001200 



S8TTL TEST # 12 - KT ERROR NOT SERVICED IF ODD ADDR. ERROR 



TEST 12 



TST12: 
000600 172350 1$: 
077402 
172310 

023622 000004 
023620 000250 
023614 001110 
060001 2$: 
3$: 



001100 4$: 
001200 

177572 001264 
177576 001270 5$: 
000017 
001264 



6$: 



7$: 



160000 177572 

016070 000004 8$: 

016142 000250 

077406 172310 



KT ERROR NOT SERVICED IF ODD ADDR. ERROR 



THIS TEST CHECKS TO SEE THAT IF A CERTAIN VIRTUAL ADDRESS THAT 

yOULD CAUSE A MEMORY MANAGEMENT ERROR CAUSES AN ODD ADDRESS 

ERROR FIRST, THE ODD ADDRESS ERROR IS SERVICED BUT THE MEHQRr 

MANAGEMENT ERROR ISN'T. THIS MEANS THAT SRO AND SR2 

SHOULD NOT REPORT THE ERROR OR LOCK UP ITS VIRTUAL ADDRESS. 

A READ-ONLY VIOLATION IS USED AS THE POTENTIAL MEMORY MANAGEMENT 

ERROR 



SCOPE 

MOV #600.KIPAR4 

MOV #77402, R5 

MOV R5.KIPDR4 

MOV #4$.i#4 

MOV #3$,a#250 

MOV #2$,$LPERR 

INC 60001 

ERROR +20 



MOV #KERSTK,KSP 

CLR STMPl 

MOV SRO.UASSRO 

MOV SR2,UASSR2 

MOV #17,R0 

CMP R0,UASSR0 

BEO 6S 

INC STMPl 

MOV #5$,R1 

CMP R1,WASSR2 

BEQ 7$ 

INC $TMP1 

TST STMPl 

BEQ 8$ 

ERROR ^21 



BIC #160000, SRO 

MOV #riMERR,a#4 

MOV #MGMERR,a#250 

MOV #77406, KIPDR4 



MAP KERNEL PAGE 4 TO 12-16K 

LOAD PDR4 DATA INTO R5 

MAP PAGE 4 READ-ONLY 

SET CPU TRAP VECTOR TO ADDRESS OF 4$ 

SET M.M. TRAP VECTOR TO ADDRESS OF 3S 

SET LOOP ON ERROR POINTER TO 2S 

CAUSE ODD ADDR. ERROR t POTENTIAL R/0 ABORT 

TRAPPED THRU M.M. VECTOR BUT SHOULDN'T HAVE 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

■BR 2$" = 000776 

RESTORE STACK POINTER AFTER TRAPPING 

CLEAR ERROR INDICATOR 

READ STATUS REG. 0 

READ STATUS REG. 2 

LOAD EXPECTED SRO CONTENTS INTO RO 

SRO ERROR BITS LEFT CLEAR BY TRAPPING? 

BRANCH IF YES 

SRO ERROR BITS SET WHEN ODD ADDR. SERVICED 
LOAD EXPECTED SR2 CONTENTS INTO Rl 
WAS SR2 LEFT UNLOCKED BY TRAPPING? 
BRANCH IF YES 

SR2 LOCKED UP BY ODD ADDR. ERROR 
WHERE SRO OR SR2 EFFECTED? 
BRANCH IF NO 

SRO OR SR2 CHANGED BY ODD ADDR. ERROR 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 2$*' = 000741 

CLEAR ERROR BITS THAT NAY BE SET IN SRO 
RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 
RESTORE ADDRESS OF NORNAL M.M. TRAP HANDLER 
REMAP PAGE 4 TO READ/WRITE 



J 7 



CKKTBDO 11/44 MEW MGMT PRT B HACRO N1113 12-JAN-82 12:19 PAGE 71 
TEST « 13 - PC t PSW SAVED FOR KT ERROR ON ODD ADDR. 



SEQUENCE 



2777 



023742 

2778 023744 

2779 023750 

2780 023756 

2781 023764 

2782 023772 

2783 024000 

2784 024006 

2785 024014 

2786 024022 

2787 024030 

2788 024036 

2789 024044 

2790 024050 
2791 

2792 024054 

2793 024060 

2794 024062 

2795 024070 

2796 024076 

2797 024104 

2798 024110 

2799 024114 

2800 024122 

2801 024126 

2802 024132 

2803 024136 
2804 

2805 
2806 

2807 024142 

2808 024144 

2809 024150 
2810 

2811 024154 

2812 024156 

2813 024162 

2814 024170 

2815 024172 

2816 024176 
2817 



000004 
004737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012706 
005237 

016601 
011603 
013737 
013737 
042737 
005037 
012706 
012737 
012706 
005037 
005037 
020127 



001402 
005237 
020327 

001402 
005237 
023727 
001402 
005237 
023727 



002356 
000600 
000600 
077402 
077406 
024054 
140017 
024054 
000340 
024036 
140000 
100002 
100005 

000002 

177572 
177576 
160000 
177776 
001100 
140000 
000600 
177776 
001176 
170017 



001 1 76 
024054 



001176 
001264 

001176 
001270 



S8TTL TEST # 13 - PC & PSy SAVED FOR KT ERROR ON ODD ADDR. 
'test 13 PC t PSy SAVED FOR KT ERROR ON ODD ADDR. 



177646 
177650 
177606 
177610 
000004 
000006 
000250 
000252 
001110 
177776 



001264 
001270 
177572 



177776 



THIS TEST CHECKS THE PC AND PROCESSOR STATUS yORD SAVED WHEN 

A KT ERROR OCCURS DURING THE SECOND PUSH ON THE STACK DURING 

SERVICING OF AN ODD ADDR. ERROR. DURING A •'DOUBLE ERROR" 

SEQUENCE SUCH AS THIS, THE PSW SAVED WILL BE THE ONE PICKED UP 

FROM VECT0R*2 (LOC. 6 IN THIS CASE) AFTER THE FIRST TRAP, 

NOT THE PSW PRESENT BEFORE THE FIRST TRAP. SRO AND SR2 

SHOULD RECORD THE KT ERROR (A R/0 VIOLATION BY THE USER STACK PTR.) 

NOTE THAT THE PREVIOUS MODE BITS <13:12> OF THE PSW 
WILL BE SET IN THE PSW THAT IS SAVED. 

•*•*•***••*****•••***•********•*•***••*•*•*****••*••••••*•••••* 

T13; 



020147 
024050 



SCOPE 

JSR PC. TOFF 

MOV #600.UIPAR3 

MOV #600,UIPAR4 

MOV #77402, UIPDR3 

MOV #77406, UIPDR4 

MOV #4S.»V4 

MOV #14001 7. a#6 

MOV #4$.a#250 

MOV #340.a#252 

MOV #2$.iLPERR 

2$: MOV #140000, PSW 

MOV #1 00002, USP 

3$: INC 100005 

4$: MOV 2CKSP).R1 

MOV (KSP),R3 

MOV SRO.WASSRO 

MOV SR2.WASSR2 

BIC #160000, SRO 

CLR PSW 

MOV #KERSTK,KSP 

MOV #140000, PSW 

MOV #USESTK.USP 

CLR PSW 

CLR STMPO 

CMP R1, #17001 7 



BEO 5$ 

INC STMPO 

5f: CMP R3.#3$*4 

BEO 6$ 

INC $TMPO 

6$: CMP WASSR0.#20147 

BEO 7$ 

INC $TMPO 

7$: CMP WASSR2,#3$ 



MAP USER PAGE 
MAP USER PAGE 
MAP USER PAGE 



TURN T-8IT TRAPPING OFF FOR THIS TEST 
MAP USER PAGE 3 TO 12-16K 
4 TO 12-16K 

3 READ-ONLV 

4 READ/WRITE 

LOAD ADDRESS OF 4$ IN CPU (ODD ADDR.) VECTOR 
LOAD PSW THAT SHOULD BE PUT ON STACK IN VECT0R*2 
LOAD ADDRESS OF 4$ IN M.M. TRAP VECTOR 
LOAD A KERNEL PSW IN MMVEC+2 
SET LOOP ON ERROR POINTER TO 2$ 
GO TO USER MODE 

SET USER STACK PTR. SO SECOND PUSH IS IN PG. 3 

CAUSE ODD ADDRESS ERROR THAT WILL CAUSE 

R/0 ERROR WHEN TRY TO SAVE OLD PC 

PUT PSW SAVED ON KERNEL STACK INTO Rl 

PUT PC SAVED ON KERNEL STACK INTO R3 

READ THE CONTENTS OF M.M. STATUS REG. 0 

READ THE CONTENTS OF M.M. STATUS REG. 2 

CLEAR THE ERROR BITS IN SRO 

BE SURE IN KERNEL MODE 

RESTORE KERNEL STACK POINTER 

60 TO USER MODE 

RESTORE USER STACK POINTER 

GO BACK TO KERNEL MODE 

CLEAR ERROR INDICATOR 

WAS THE PSW SAVED THE ONE PICKED UP BY THE 
ODD ADDR. TRAP FROM ERRVEC*2? 
VALUE 170017 = PSW FROM LOC. 6 WITH 
PREVIOUS MODE BITS = USER 
BRANCH IF YES 

WRONG PSW SAVED DURING "DOUBLE ERROR" SEQUENCE 
WAS THE PC AT THE TIME OF THE ODD ADDR. ERROR 
SAVED ON THE STACK? 
BRANCH IF YES 

WRONG PC SAVED DURING TRAP SEQUENCE 

DID SRO REPORT - USER. PAGE 3, R/0 ABORT? 

BRANCH IF YES 

SRO DID NOT REPORT R/0 ABORT 

DID SR2 LOCK UP VIRTUAL ADDR. OF LAST 

INSTRUCTION SUCCESSFULLY FETCHED? 



CKl^TBDO 11/44 MEM MGMT PRT B HACRO H1 113 12-JAN-82 12:19 PAGE 
TEST « 13 - PC t PSU SAVED FOR KT ERROR ON ODD ADDR. 



K 

71 



2818 

28^9 

2820 

2821 

2822 

2823 

2824 

2825 

2826 

2827 

2828 

2829 

2830 

2831 

2832 

2833 



024204 
024206 
024212 
024216 
024220 



024222 
024230 
024236 
024244 
024252 



001402 
005237 
005737 
001401 
104022 



001176 
001176 



8$: 



BEQ 

INC 
TST 
BEQ 
ERROR 



012737 016070 000004 9S: 

012737 000340 000006 

012737 016142 000250 

012737 077406 177606 

004737 002412 



MOV 
MOV 
MOV 
MOV 
JSR 



8$ 

STMPO 
$TMPO 
9$ 

♦22 



4rriMERR,air4 
*340,a#6 

#nGnERR,a#250 

#77406. UIPDR3 
PC. TON 



SEQUENCE 



BRANCH IF YES 

SR2 DID NOT LOCK UP ADDR. OF ODD ADDR. INST. 
ANY "ERRORS" DURING TRAP SEQUENCE? 
BRANCH IF NO 

THE WRONG PC OR PSU WERE SAVED 
OR SRO OR SR2 DID NOT REPORT R/O 
ERROR DURING ODD ADDR. - KT TRAP 
SEQUENCE 

FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 2S" = 000710 

RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 

RELOAD EfiRVEC+2 WITH KERNEL PSW 

RESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 

REMAP USER PAGE 3 READ/WRITE 

TURN T-8IT TRAPPING BACK ON 



CKU8D0 11/44 MEM HGMT PRT B MACRO Min3 12-JAN-82 12:19 PAGE ^2 ^ SEQUENCE 
GROUP 2 D-SPACE TESTS 



2834 
2835 
2836 



.S8TTL GROUP 2 0-SPACE TESTS ^ ^ 

;/.\./.\./.\./.\./.\./.\./.^./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\ 

:/.\./.\./.\./.\./.\./.\./.\./.\./.\./.\,/,\./.\./.\./.\./.\./.\./.\./.\./.\ 



CKKTBDO n/4A MEM M6MT PRT B MACRO M1113 12-JAN-82 12:19 
TEST # U - ENABLE D-SPACE AND SEE THAT I-SPACE IS FORCED 



M 7 

PAGE 73 



SEQUENCE 



2852 



02A2S6 

2853 

285A 02A260 

2855 02426A 

2856 024270 

2857 024274 

2858 024300 

2859 024304 

2860 024310 

2861 024316 

2862 024324 

2863 024332 

2864 024336 
2865 

2866 

2867 024344 

2868 024346 

2869 024350 

2870 024352 

2871 024354 

2872 024356 

2873 024360 
2874 

2875 
2876 

2877 024362 

2878 024364 

2879 024366 

2880 024370 

2881 024372 

2882 024374 
2883 

2884 

2885 024400 

2886 024406 

2887 024414 

2888 024420 

2889 024424 

2890 024430 

2891 024434 



000004 

005037 
012700 
010037 
010037 
010037 
010037 
012737 
012737 
012737 
005237 
012737 



005700 
005200 
005300 
006000 
006100 
005037 



012737 
012737 
005237 
005727 
005737 
005737 
005777 



S8TTL TEST # 14 - ENABLE D-SPACE AND SEE THAT I-SPACE IS FORCED 
TEST 14 ENABLE D-SPACE AND SEE THAT I-SPACE IS FORCED 



THIS TEST SHOWS THAT I-SPACE IS FORCED DURING INSTRUCTION FETCHES. 
AND ADDRESS. INDEX AND OPERAND FETCHES IF THE REGISTER FIELD IS 7. 

ALL ERRORS FOUND IN THIS TEST ARE REPORTED WHEN THE CPU 
ABORTS THRU 'WVEC" TO SUBROUTINE 'MODSPAC". THIS SUB- 
ROUTINE WILL REPORT THAT D-SPACE WAS NOT ENABLED PROPERLr. 

NOTE - WHENEVER A DSTM=3.6.7 IS SHOWN. AND THE OPERAND IS 
'100000'. I-SPACE IS FORCED IN THE OPERAND FETCH, 
BUT D-SPACE WILL BE FORCED ON THE ACCESS OF THE 
LOCATION; CORRECT OPERATION IS CHECKED. 



TST14; 



177572 
077400 
172310 
172322 
172324 
172326 
000600 
002232 
024344 
177572 
000024 



SCOPE 

.•INITIALIZE 



172370 
000250 
001110 

172516 



CLR MMRO 

MOV #77400. RO 

MOV R0.KIPDR4 

MOV R0.KDPDR1 

MOV R0.KDPDR2 

MOV R0.KDPDR3 

MOV #600.ICDPAR4 

MOV #NODSPAC.HHV£C 

nOV #10$.$LPERR 

INC MMRO 

NOV #24.MMR3 



KERNAL I/O SPACE PAR'S AND PDR'S 

TURN OFF MEMORY MANAGEMENT 
MAKE KERNAL D-SPACE PCS. 1.2i3 NON-RESIDENT 
AND KERNAL I-SPACE PDR4 NON-RESIDENT 



MAP KDPAR4 TO 12->16K 

SET M.M. VECTOR TO D-SPACE SERVICE ROUTINE 
SET LOOP ON ERROR POINTER TO 10$ 
TURN ON MEMORY MANAGEMENT 





;• 


TEST 


THAT INSTRUCTION FETCHES FORCE I-SPACE 


000400 


10$: 


BR 


4$ 




'BRANCH 


000244 


4$: 


CLZ 






■CLEAR ZERO BIT IN PSW 


001776 




BEQ 


4$ 




•NO BRANCH 


000264 


5$: 


SEZ 






•SET ZERO BIT IN PSW 


001376 




BNE 


5$ 




;N0 BRANCH 


000270 


6$: 


SEN 






•SET NEGATIVE BIT IN PSW 


100376 




BPL 


6$ 




■NO BRANCH 




• ♦ 


TRY SOME SOP 


INSTRUCTIONS WITH SRCM=DSTM=0 




• • 


THESE 


SHOULD 


NEVER INVOKE D-SPACE 



177572 



100002 
024420 
177572 
060000 
100000 
100000 
053340 



TST 
INC 
DEC 
ROR 
ROL 
CLR 



RO 
RO 
RO 
RO 
PO 
MMRO 



;TURN OFF MEMORY MANAGEMENT 



TEST SOB NON-MOO WITH DSTM=2,3,6.7; DSTF=7 



060000 
001110 



11$: 



MOV 


#1 00002. a4f60000 , 


•SET UP TEST LOCATION 


MOV 


*11$.$LPERR 


•SET LOOP ON ERROR POINTER TO 11$ 


INC 


MMfiO 


•TURN ON MEMORY MANAGEMENT 


TST 


#60000 


DSTM=2 SOP NON-MOD 


TST 


S#1 00000 


DSTM=3 SOP NON-MOD 


TST 


100000 


DSTM=6 SOP NON-MOD 


TST 


SI 00000 


■DSTM=7 SOP NON-MOD 
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TEST # U - ENABLE D-SPACE AND SEE THAT I-SPACE IS FORCED 



N 

PAGE 73 



SiQUtHC( 



2892 

2893 

289A 

2895 

2896 

2897 

2898 

2899 

2900 

2901 

2902 

2903 

290A 

2905 

2906 

2907 

2908 

2909 

2910 

2911 

2912 

2913 

29K 

2915 

2916 

2917 

2918 

2919 

2920 

2921 

2922 

29^3 

29^4 

2925 

2926 

2927 

2928 

2929 

2930 

2931 

2932 

2933 

293A 

2935 

2936 

2937 

2938 

2939 

29A0 

2941 

2942 

2943 

2944 

2945 

2946 

2947 

2948 



024440 005037 177572 



024444 
024452 
024460 
024464 
024470 
024474 
024500 
024504 



024510 
024516 
024524 
024530 
024536 
024544 
024552 
024560 



024564 
024572 
024600 
024604 
024612 
024620 
024626 
024634 



024640 
024646 
024652 
024660 
024666 
024674 
024702 



024706 
024714 
024722 
024726 
024732 
024736 
024742 
024746 



012737 
012737 
005237 
005027 
005037 
005037 
005077 
005037 



012737 
012737 
005237 
022727 
023737 
023737 
027777 
005037 



012737 
012737 
005237 
012727 
012737 
012737 
012777 
005037 



012737 
005237 
052727 
052737 
052737 
052777 
005037 



012737 
012737 
005237 
000327 
000337 
000337 
000377 
005037 



024464 
100000 
177572 
060000 
100000 
100000 
053276 
177572 



024530 
100000 
177572 
060000 
100000 
100000 
053224 
177572 



024604 
100000 
177572 
060002 
060000 
060000 
060000 
177572 



024652 
177572 
060000 
000000 
OCOOOO 
000000 
177572 



024726 
100002 
W7572 
060000 
100002 
100002 
053032 
177572 



001110 
060002 



001110 
060002 

060000 
100000 
100000 
053222 



001110 
060002 

060002 
100000 
100000 
053146 



001110 

060000 
100000 
100000 
053100 



001110 
060000 



12$: 



13$: 



14$: 



15$: 



16$: 



CLR mRO ;TURN OFF MEMORY MANAGEMENT 

TEST S08 MOD WITH DSTM=2,3,6, 7; DSTF=7 



MOV *12$.$LPERR 

MOV #1 00000, a#60002 

INC HMRO 

CLR #60000 

CLR a#1 00000 

CLR 100000 

CLR ai 00002 

CLR MMRO 



;SET LOOP ON ERROR POINTER TO 12$ 

;SET UP TEST VALUES 

.TURN ON MEMORY MANAGEMENT 

;DSTM=2 SOP MOD 

;DSTM=3 SOP MOD 

;DSTM=6 SOP MOD 

;DSTM=7 SOP MOD 

:TURN OFF MEMORY MANAGEMENT 



THE NEXT THREE TESTS ARE CONCERNED WITH TESTING 
DOP AND NOT(SRCM=DSTM=0) 

TEST DOP DEST NON-MOD SRCH=DSTH=2.3.6.7; SRCF=DSTF=7 

MOV #13$.$LPERR ;SET LOOP ON ERROR POINTER TO 
MOV #1 00000, a#60002 ;SET UP TEST VALUE 
INC MMRO .-TURN ON MEMORY MANAGEMENT 

CMP #60000-/r60000 ;SRCM=2 DSTM=2 OOP NON-MOD 
CMP a#1 00000 -a#1 00000 ;SRCM=3 DSTM=3 DOP NON-HOD 
CMP 100000-100000 ;SRCM=6 DSTM=6 DOP NON-MOD 
CMP ai 00002,3100002 ;SRCM=7 PSTM=7 DOP NON-MOD 
CLR MMRO .-TURN OFF MEMORY MANAGEMENT 

TEST MOV DEST AND NOT (SRCM=DSTM=0) 
SRCM=DSTM=2.3,6.7; SRCF=DSTF=7 



13$ 



MOV 
MOV 
INC 
MOV 
MOV 
MOV 
MOV 
CLR 



*14$.$LPERR 

#100000,a4r60002 

MMRO 

#60002, #60002 

#60000. a#i 00000 

#60000,100000 
#60000, ai00002 
MMRO 



SET LOOP ON ERROR POINTER TO 14$ 
SET UP TEST VALUE 
TURN ON MEMORY MANAGEMENT 
SRCM=2 DSTM=2 MOV 
SRCM=2 DSTM=3 MOV 
SRCM=2 DSTM=6 MOV 
SRCM=2 DSTM-7 MOV 
TURN OFF MEMORY MANAGEMENT 
TEST DOP DEST MOO AND NOT SUB 
SRCM=DSTM=2,3,6,7; SRCF=DSTF=7 



MOV #15$,$LPERR 

INC MMRO 

BIS #60000, #60000 

BIS #00000, a# 100000 

BIS #00000,100000 

BIS #00000, ai 00002 

CLR MMRO 



TEST SWAB WITH DSTH=2.3,6,7; DSTF=7 



SET LOOP ON ERROR POINTER TO 15$ 
TURN ON MEMORY MANAGEMENT 
SRCM=2 DSTM=2 DOP MOD 
SRCM=2 DSTM=3 DOP MOD 
SRCM=2 DSTM=6 DOP MOD 
SRCM=2 DSTH=7 DOP MOD 
TURN OFF MEMORY MANAGEMENT 



MOV #16$,$LPERR 

MOV #1 00002, a#60000 

INC MMRO 

SWAB #60000 

SWAB a#1 00002 

SUA8 100002 

SWA8 ai 00000 

CLR MMRO 



TEST ROT/SHFT WITH DSTM-^,3,6,7; DSTF=7 



SET LOOP ON ERROR POINTER TO 16$ 

SET UP TEST VALUES 

TURN ON MEMORY MANAGEMENT 

DSTM=2 SWAB 

DSTM=3 SWAB 

0STM=6 SWAB 

DSTM=7 SWAB 

TURN OFF MEMORY MANAGEMENT 



'ES^ # K - FNABlE D-SPACE AND SEE THAT 1-S>*ACE 



29<9 










• • 


2950 


024752 


012737 


02U772 


001110 




2951 


024 760 


012737 


100000 


06C002 




2952 


024766 


005237 


^77572 




17$ 


29S5 


024772 


006127 


060000 




2954 


024776 


0061 37 


100000 






2955 


025002 


006137 


100000 






2956 025006 


006177 


052770 






2957 025012 


005037 


^77572 






2958 










• » 


2959 










• • 


2960 025016 


012737 


025044 


001110 




2961 


025024 


012737 


000001 


060000 




2962 
2963 


025032 


012737 


100000 


060002 




025040 


005237 


177572 






296<. 


025044 


072027 


000001 




18$ 


?965 


025050 


072037 


100000 






2966 


025054 


072037 


100000 






2967 


025060 


072077 


052716 






2968 


025064 


005037 


y77S72 






2969 










• • 


2970 










• • 


2971 


025070 


012737 


025102 


001110 




2972 


025076 


005237 


177572 






2973 025102 


070027 


000002 




19$ 


29 7* 


025106 


070037 


100000 






2975 


025112 


070037 


100000 






2976 025116 


070077 


052660 






2977 025122 


005037 


}77^72 






2978 










• • 
• 


2979 










• * 


2980 


025126 


012737 


025146 


ooino 




2981 


025134 


012737 


025162 


060000 




2982 


025142 


005237 


}77^72 






2983 


025146 


000137 


025152 




20$ 


2984 


025152 


000137 


025156 




21$ 


2985 


025156 


000177 


052616 




22S 


2986 025162 


005037 


]77S72 




23$ 


2987 










• • 


2988 










■ • 


2989 025166 


012737 


025210 


001110 




2990 


025174 


005000 








2991 


025176 


012737 


100000 


060002 




2992 


025204 


005237 


^77%72 






2993 


025210 


160027 


060002 




28$ 


2994 


025214 


160037 


100000 






2995 


025220 


160037 


100000 






2996 


025224 


160077 


052552 






2997 


025230 


005037 


}77572 







e 8 

JAN-82 12:19 PAGE 73-2 
IS FORCED 



flOV #17$,$LPERR ;SET LOOP ON ERROR POINTER TO 17$ 

HOV #1 00000. a#60002 .-SET UP TEST VALUES 

INC WRO ;TURN ON MEnORr MANAGEMENT 

ROL #60000 ;DST«=2 ROT/SHFT 

ROL a*100000 ;DST«=3 ROT/SHFT 

ROL 100000 ;DST«=6 ROT/SHFT 

ROL ai00002 ;DST«=7 ROT/SHFT 

CLR WWO :TURN OFF MEMORY MANAGEMENT 

TEST ASH/ASHC WITH DSTM=2,3.6.7; DSTF=7 

MOV #18$.$LPERR .-SET LOOP ON ERHOR POINTER TO 18$ 

MOV #1.a*60000 ;SET UP TEST VALUES 

MOV #1 00000. a#60002 

INC MMRO .-TURN ON MEMORY MANAGEMENT 

ASH #1,R0 ;DSTM=2 ASH/ASHC 

ASH i#100000.RO ;DSTM=3 ASH/ASHC 

ASH 100000, RO ;DSTM=6 ASH/ASHC 

ASH 8100002. RO ;DSTM=7 ASH/ASHC 

CLR MMRO .-TURN OFF MEMORY MANAGEMENT 

TEST MUL/DIV WITH DSTM=2.3.6.7; DSTF=7 

MOV #19$.$LPERR ;SET LOOP ON ERROR POINTER TO 19$ 

INC MMRO .-TURN ON MEMORY MANAGEMENT 

MUL #2.R0 ;DSTM=2 MUL/DIV 

MUL WIOOOOO.RO ;DSTM=3 MUL/DIV 

MUL lOOOOO.RO ;DSTM=6 MUL/DIV 

MUL 8100002, RO ;DSTM=7 MUL/DIV 

CLR MMRO .-TURN OFF MEMORY MANAGEMENT 

TEST JMP yiTH DSTM=3,6.7; DSTF=7 

MOV #20$.$LPERR ;SET LOOP ON ERROR POINTER TO 20$ 

MOV #23$.a#60000 ;SET UP TEST VALUES 

INC MMRO .-TURN ON MEMORY MANAGEMENT 

JMP i*21f ;0STM=3 JMP 

JMP 22$ ;DSTM=6 JMP 

JMP 8100000 ;DSTM=7 JMP 

CLR MMRO .-TURN OFF MEMORY MANAGEMENT 

TEST SUB yJTH DSTM=2.3.6.7; DSrF=7 

MOV #28$.$LPERR ;SET LOOP ON ERROR POINTER TO 28$ 

CLR RO ;SET UP TEST VALUES 

MOV # 100000.8*60002 

INC MMRO .-TURN ON MEMORY MANAGEMENT 

sue R0,*60002 ;DSTM=2 SUB 

SUB RO, 8*100000 ;0STM=3 SUB 

SUB RO. 100000 ;DSTM=6 SUB 

SUB RO. 8100002 ;DSTM=7 SUB 

CLR MMRO .-TURN OFF MEMORY MANAGEMENT 



C 8 

CKKTBDO 11/44 PUn HGHT PRT B HACRD M1113 12-JAN-82 12:19 PAGE 74 
TEST # 15 - ENABLE D-SPACE AND SEE I-SPACE IS NOT FORCED 



SEQUENCE 91 



3008 



025234 

3009 025236 

3010 025242 

3011 025246 

3012 025252 

3013 025256 

3014 025262 
3015 

3016 

3017 025266 

3018 025272 

3019 025276 

3020 025304 

3021 025312 

3022 025320 

3023 025326 

3024 025334 

3025 025342 

3026 025350 

3027 025356 

3028 025362 

3029 025364 

3030 025366 

3031 025370 

3032 025372 

3033 025376 
3034 

3035 

3036 025402 

3037 025410 

3038 025414 

3039 025416 

3040 025420 

3041 025422 

3042 025424 

3043 025430 
3044 

3045 
3046 

3047 025434 

3048 025442 

3049 025446 

3050 025452 

3051 025456 

3052 025460 



000004 
012700 
010037 
010037 
010037 
010037 
105037 



012700 
010037 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
005237 
005710 
005720 
005730 
005750 
005770 
005037 



012737 
005237 
005010 
005020 
005030 
005050 
005070 
005037 



012737 
012702 
012700 
012701 
010021 
062700 



077406 
172310 
}72522 
^72l2^^ 
y72l2(> 
172306 



060000 
060000 
060002 
060004 
060006 
025362 
060000 
060002 
060004 
060006 
M7S72 



000000 
177572 



025414 
U7572 



000000 
177572 



025476 
000032 
060000 
C60000 

000002 



S8TTL TEST # 15 - ENABLE D-SPACE AND SEE I-SPACE IS NOT FORCED 
'test 15 ENABLE D-SPACE AND SEE I-SPACE IS NOT FORCED 



TSTl 



THIS TEST SHOWS THAT I-SPACE IS NOT FORCED IF THE REGISTER FIELD 
IS NOT 7. BUT THE OTHER CONDITIONS ARE MET. 

ALL ERRORS FOUND IN THIS TEST ARE REPORTED WHEN THE CPU ABORTS 
THROUGH 'MMVEC TO SUBROUTINE 'NODSPAC*. THIS SUBROUTINE WILL 
REPORT THAI D-SPACE WAS NOT ENABLED PROPERLY. 

•*•**•******•**•*••**•*•***»**•••*****«****••••**•*******•**• 

5: SCOPE 

MOV #77406. RO 



^OS: 



C^0002 
060004 
060006 
001110 
060000 
060002 
060004 
060006 



1$: 



001110 



2$: 



001110 



MOV 
MOV 
MOV 

MOV 
CLRB 



R0,KIPDR4 
R0,KDPDR1 
R0.KDPDR2 
R0.KDPDR3 
ICIPDR3 



TEST SOP NON-MOD; DSTM=1 ,2.3,5,7 



MAKE KIPDR4 R/W,4K,200 BLOCKS 
MAKE KDPDR1 R/W,4K.200 BLOCKS 
MAKE KDPDR2 R/J.4K,200 BLOCKS 
MAKE KDPDR3 R/W,4K.200 BLOCKS 
MAKE KIPDR3 NON-RESIDENT 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
INC 
TST 
TST 
TST 
TST 
TST 
CLR 
TEST 

MOV 
INC 
CLR 
CLR 
CLR 
CLR 
CLR 
CLR 
TEST 



#60000, RO 
R0.i#60000 
#60002,8*60002 
#60004, a#60004 
#60006, a#60006 
#1$,$LPERR 
#60000, i#60000 
#60002, a#60002 
#60004, a#60004 
#60006, 8#60006 
MKRO 
(RO) 
(RO)* 
a(RO)-* 
8-(R0) 
aO(RO) 
MMRO 



SOP MOD; DSTM=1,2.3,5,7 



;SET UP CONSTANTS ^OR TEST 



;SET LOOP ON ERROR POINTER TO 11 



TURN ON MEMORY MANAGEMENT 
DSTM=1 SOP NON-MOD 
DSTM=2 SOP NON-MOD 
DSTM=3 SOP NON-MOD 
DSTM=5 SOP NON-MOD 
DSTM=7 SOP NON-MOD 
TURN OFF MEMORY MANAGEMENT 



#2$-$LPERR 
MMRO 

(RO) 

(RO)* 

a(RO)* 

a-(RO) 
ao(RO) 

MMRO 



SET LOOP ON ERROR POINTER TO 2S 
TURN ON MEMORY MANAGEMENT 
DSTM=1 SOP MOD 
DSTM=2 SOP MOD 
DSTM=3 SOP MOP 
DSTM=5 SOP HOD 
DSTM=7 SOP MOD 
TURN OFF MEMORY MANAGEMENT 



DOP DEST NON-MOD WITH SRCM=1 ,2.3,5,7 AND DSTM=1 ,2,3,5,7 



ALL SOURCE MODES TO BE TESTED ARE TESTED HERE 



21S: 



MOV 
MOV 
MOV 
MOV 
MOV 
ADD 



#3$,$LPERR 
#32.R2 
#60000, RO 
#60000. R1 
RO.(RI)* 
#2.R0 



;SET LOOP ON ERROR POINTER TO 3$ 

;SET UP ADDRESSES 60000-60064 FOR TEST 
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TEST t 15 - ENABLE D-SPACE AND SEE 1-SPACE IS NOT FORCED 



D 8 

PAGE 74-1 



SEQUENCE 94 



3053 025464 


077204 








S08 


R2.21$ 
#60000, RO 


3054 025466 


012700 


060000 






MOV 


3055 025472 


005237 


177572 






INC 


MMRO 


3056 025476 


021010 






3$: 


CMP 


(RO) , (RO) 


3057 025500 


021020 








CMP 


(RO).(RO)* 


3058 025502 


021030 








CMP 


(RO) ,S(RO)* 


3059 025504 


021050 








CMP 


(RO) ,8-(R0) 


3060 025506 


021070 


000000 






CMP 


(RO) ,aO(RO) 


3061 025512 


022010 








CMP 


(RO)*. (RO) 


3062 0255U 


022020 








CMP 


(RO)*, (RO)* 
(R0)*.a(RO)+ 


3063 025516 


022030 








CMP 


3064 025520 


022050 








CMP 


(RO)*,a-(RO) 


3065 025522 


022070 


000000 






CMP 


(R0)*,ao(RO) 


3066 025526 


023010 








CMP 


•««mA\ /mM\ 

a(RO)*, (RO) 


3067 025530 


023020 








CMP 


a(RO)*.(RO)* 


3068 025532 


023030 








CMP 


a(RO)*,a(RO)* 


3069 025534 


023050 








CMP 


a(RO)*,a-(RO) 


3070 025536 


023070 


000000 






CMP 


a(RO)*,aO(RO) 


3071 025542 


025010 








CMP 


/mM\ /mAV 

a-(RO) , (RO) 


3072 0255A4 


025020 








CMP 


a-(RO),(RO)* 

a-(RO) ,a(RO)* 


3073 0255A6 


025030 








CMP 


3074 025550 


025050 








CMP 


^ M M V ^ / M M 1 

a-(RO) ,a-(RO) 


3075 025552 


025070 


000000 






CMP 


/mA\ •nA/mA\ 

a-(RO) .ao(RO) 


3076 025556 


027010 


000000 






CMP 


aO(RO) , (RO) 


3077 025562 


027020 


M 0^ 0\ A A A 

000000 






CMP 


aO(RO) , (RO)* 

ao(RO) ,a(RO)* 


3078 025566 


027030 


000000 






CMP 


3079 025572 


027050 


A A A M A A 

000000 






CMP 


M y M A V M y M M V 

ao(RO) ,a-(RO) 


3080 025576 


027070 


000000 


000000 




CMP 


ao(RO) ,aO(RO) 


3081 025604 


005037 


177572 






CLR 


MMRO 


3082 








• * 
• 


TEST 


DOP DEST MOD AND 


3083 








• * 
« 






3084 025610 


A A F A A A 

005000 








CLR 


M A 

RO 


3085 025612 


012701 


060000 






MOV 


#60000, Rl 


3086 025616 


012737 


025630 


001110 




MOV 


#4$.$LPERR 
MMRO 


3087 025624 


005237 


177572 






INC 


3088 025630 


050011 






4$: 


BIS 


RO, (Rl ) 


3089 025632 


050021 








BIS 


RO, (Rl )* 


3090 025634 


050031 








BIS 


RO.a(Rl )* 


3091 025636 


050051 








BIS 


M M y M 4 \ 

R0,a-(R1 ) 


3092 025640 


050071 


M M M M M M 

000000 






BIS 


RO,aO(Rl ) 


3093 025644 


005037 


177572 






CLR 


HWRO 


3094 








• * 


TEST 


MOV DEST AND NOT( 


3095 








• ♦ 






3096 025650 


012701 


060000 






MOV 


#60000, Rl 


3097 025654 


012737 


060002 


060000 




MOV 


#60002, 8#60000 


3098 025662 


012737 


025674 


0011 10 




MOV 


#5$,$LPERR 


3099 025670 


005237 


1 77572 






INC 


MMRO 


3100 025674 


010031 






5S: 


MOV 


R0.a(R1 ) * 


3101 025676 


010051 








MOV 


R0,a-(R1) 


3102 025700 


010071 


000000 






MOV 


RO,aO(Rl) 


3103 025704 


005037 


177572 






CLR 


MMRO 


3T04 








0 


TEST 


Cl IAD . I\CTM— i ^ 7 

SWAB; D5TM- 1,^,3, 


3105 












3106 025710 


012701 


060000 






MOV 


#60000, Rl 


3107 025714 


012737 


025726 


001110 




NOV 


#6$.$LPERR 


3108 025722 


005237 


}77S72 






INC 


MMRO 


3109 025726 


00031 1 






6S: 


SWAB 


(Rl) 



TURN 
SRCM 
SRCM 
SRCM 
SRCM 
SRCM 
SRCM 
SRCM 
SRCM 
SRCM 
SRCM 
SRCM 
SRCM 

SRCM: 
SRCM: 

SRCM: 
SRCM: 

SRCM: 
SRCM: 
SRCM: 

SRCM 

SRCM: 
SRCM: 

SRCM 
SRCM: 
SRCM 

TURN 
NOT SUB 



DSTM=7 
DSTM=1 
DSTM=2 



ON MEMORY MANAGEMENT 
1 DSTM=1 DOP DtST NON-MOD 
DSTM=2 DOP DEST NON-MOD 
DSTM=3 DOP DEST NON-MOD 
DSTM=5 DOP DEST NON-MOD 
DOP DEST NON-MOD 
DOP DEST NON-MOD 
DOP DEST NON-MOD 
DSTM=3 DOP DEST NON-MOD 
DSTM=5 DOP DEST NON-MOD 
DSTM=7 DOP DEST NON-MOD 
=3 DSTM=1 DOP DEST NON-MOD 
DSTM=2 DOP DEST NON-MOD 
DSTM=3 DOP DEST NW-MOD 
DSTM=5 DOP DEST NON-MOD 
DSTM=7 DOP DEST NON-10D 
DSTM=1 DOP DEST NON-MOD 
DSTM=2 DOP DEST NON-MOD 
DSTM=3 DOP DEST NON-MOD 
DSTM=5 DOP DEST NON-MOD 
DOP DEST NON-MOD 
DOP DEST NCW-MOD 
DSTM=2 DOP DEST NON-MOD 
DSTM=3 DOP DEST NON-MOD 
DSTH=5 DOP DEST NON-MOD 
DSTH=7 DOP DEST NON-MOD 
OFF MEMORY MANAGEMENT 
DSTM=1.2.3,5,7 



1 
1 
1 
1 
2 
2 
2 
2 
2 
3 
3 
3 
3 
3 
5 
5 
5 
5 

S DSTM=7 
■7 DSTM=1 

■ 7 
■7 
.7 

■ 7 



SET UP CONSTANTS FOR TEST 

SET LOOP ON ERROR POINTER TO 4S 

TURN ON MEMORY MANAGEMENT 

DSTM=1 DOP DEST HOD 

DSTM=2 DOP DEST HOD 

DSTM=3 DOP DEST MOD 

DSTM=5 DOP DEST MOD 

DSTM=7 DOP DEST MOD 

TURN OFF MEMORY MANAGEMENT 



;SET UP CONSTANTS FOR TEST 

SET LOOP ON ERROR POINTER TO 5$ 

TURN ON MEMORY HANAGEHENT 

DSTM=3 MOV DEST 

DSTM=5 HOV DEST 

DSTH=7 HOV DEST 

TURN OFF HEHORY HANAGEHENT 



SET UP CONSTANTS FOR TES^ 
SET LOOP ON ERROR POINTED TO 6S 
TURN ON HEHORY MANAGEMENT 
DSTH=1 SWAB 



'KKTBDO ME« «G«T PRT B IWCRO H1 11 3 12-JAN-82 12:19 PAGE 

TEST # 15 - ENABLE D-SPACE AND SEE I-SPACE IS NOT FORCED 



E 

74 



SEQUENCE 95 



5110 

3111 

3112 

3113 

31K 

3115 

3116 

3117 

3118 

3119 

3120 

3121 

3122 

3123 

3124 

3125 

3126 

3127 

3128 

3129 

3130 

3131 

3132 

3133 

3134 

3135 

3136 

3137 

3138 

3139 

3140 

3141 

3142 

3143 

3144 

3145 

3146 

3147 

3148 

3149 

3150 

3151 

3152 

3153 

3154 

3155 

3156 

3157 

5158 

3159 

3160 

3161 

3162 

3163 

3164 

3165 

3166 



025730 
025732 
025734 
025736 
025742 



025746 
025752 
025756 
025760 
025766 
025774 
026002 
026010 
026016 
026022 
026024 
026026 
026030 
026032 
026036 



026042 
026050 
026052 
026056 
026060 
026062 
026064 
026066 
026072 



026076 
026104 
026112 
026116 
026124 
026130 
026132 
026134 
t26136 
026140 
026144 



026150 
026156 
026164 
026172 
026176 
026202 
026204 
026210 



000321 
000331 
000351 
000371 
005037 



012701 
012702 
010203 
012737 
012737 
012737 
012737 
012737 
005237 
006111 
006121 
006131 
006152 
006173 
005037 



012737 
005003 
005237 
070310 
070320 
070330 
070350 
070370 
005037 



012737 
012737 
012700 
012737 
005237 
072310 
0723*?0 
072330 
072350 
072370 
005037 



012737 
012737 
012737 
012701 
005237 
000131 
000171 
005037 



000000 
177572 



060000 
060006 

060000 060000 
060002 060002 
060004 060004 
060006 060006 
026022 001110 
177572 



000000 
177572 



026056 001110 
177572 



000000 
177572 



000001 
060000 
060000 
026130 
177572 



000000 
^ 77572 



026202 
026204 
026210 
060000 
y77'i72 

000000 
y77'i72 



7$: 



8S: 



060000 
060002 

001110 



9$; 



001110 
060000 
060002 



10$ 
11$ 
12$ 



SWAB 
SWAB 
SUAB 
SWAB 

CLR 



a(R1)^ 
a-(R1) 

ao(Ri) 
wwo 



TEST ROT/SHFT; DSTH=1 .2,5.5.7 



DSTM=2 SWAB 
DST«=3 SWAB 
DSTM=5 SWAB 
DSTM=7 SWAB 

TURN OFF HEMORy MANAGEMENT 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
INC 
ROL 
ROL 
ROL 
ROL 
ROL 
CLR 
TEST 

MOV 
CLR 
INC 
MUL 
MUL 
MUL 
MUL 
MUL 
CLR 



#60000. R1 
#60006. R2 
R2.R3 

#60000. a#60000 
#60002. a#60002 
#60004, a#60004 
#60006, a#60006 
#7$.$LPERR 
MMRO 
(R1) 
(RD* 
a(Rl)+ 
a-(R2) 
a0(R3) 
MMRO 



;SET UP CONSTANTS FOR TEST 



MUL/DIV; DSTM=1.2.3.5.7 



SET LOOP ON ERROR POINTER TO 7$ 

TURN ON MEMORY MANAGEMENT 

DSTM=1 ROT/SHFT 

DSTM=2 ROT/SHFT 

DSTM=3 ROT/SHFT 

DSTM=5 ROT/SHFT 

DSTM=7 ROT/SHFT 

TURN OFF MEMORY MANAGEMENT 



#8$.$LPERR 

R3 

MMRO 

(R0).R3 
(R0)*.R3 
a(R0)+.R3 
a-(R0).R3 
a0(R0),R3 
MMRO 

TEST ASH/ASHC; DSTM: 



SET LOOP ON ERROR POINTER TO 8$ 
SET UP CONSTANT FOR TEST 
TURN ON MEMORY MANAGEMENT 
;DSTM=1 MUL/DIV 
:DSTM=2 MUL/DIV 
;DSTM=3 MUL/DIV 
;DSTM=5 MUL/DIV 
;DSTM=7 MUL/DIV 
•TURN OFF MEMORY MANAGEMENT 
^1.2.!!. 5. 7 



MOV #1 .a^60000 

MOV #60000. a#60002 

MOV #60000. RO 

MOV #9$.$LPERR 

INC MMRO 

ASH (R0).R3 

ASH (R0)*.R3 

ASH a(R0)4^.R3 

ASH a-(R0),R3 

ASH aO(RO).R3 

CLR MMRO 
TEST JMP; DSTM=3.7 

MOV #10$.$LPERR 

MOV #11$.a#60000 

MOV #12$.a#60002 

MOV #60000. R1 

INC MMRO 

JMP a(R1)* 

JMP aO(R1) 

ClR MMRO 
TEST JSR; 0STM=3.7 



;SET UP CONSTANTS FOR THE TEST 



SET LOOP ON ERROR POINTER TO 9$ 

TURN ON MEMORY MANAGEMENT 

DSTM=1 ASH/ASHC 

DSTM=2 ASH/ASHC 

DSTM=3 ASH/ASHC 

DSTM=5 ASH/ASHC 

DSTM=7 ASH/ASHC 

TURN OFF MEMORY MANAGEMENT 



.-SET LOOP ON ERROR POINTER TO 10$ 
;SET UP CONSTANTS FOR THE TEST 



TURN ON MEMORY MANAGEMENT 
DSTM=3 JMP 
DSTM=7 JMP 

TURN OFF MEMORY MANAGEMENT 



CKKTBDO 11/44 HEM MGHT PRT B MACRO Mil 13 12-JAN-82 12:19 PAGE 
TEST # 15 - ENABLE 0-SPACE ANP SEE I-SPACE IS NOT FORCED 



F 8 
74-5 



3167 
3168 
3169 
3170 
3171 
3172 
3173 
3174 
3175 
3176 
3177 



026214 
026222 
026230 
026236 
026242 
026246 
026250 
026254 
026260 
026266 



012737 
012737 
012737 
012701 
005237 
004731 
004771 
005037 
112737 
012706 



026246 
026250 
026254 
060000 
177572 

000000 
177572 
000006 
001 ICO 



001110 
060000 
060002 



172306 



13$ 
14$ 
15$ 



NOV #13$,$LPERR 

flOV *14$.a«60000 

HOV #15$.W60002 

MOV #60000, Rl 

INC MMRO 

JSR PC.a(RI)* 

JSR PC.aO(RI) 

CLR MMRO 

M0V6 «6,KIPDR3 

MOV #KERSTK.KSP 



SEQUENCE 



.SET LOOP ON ERROR POINTER TO 13$ 
.-SET UP CONSTANTS FOR THE TEST 



TURN ON MEMCRy MANAGEMENT 
DSTM=3 JSR 
DSTM=7 JSR 

TURN OFF MEMORV MANAGEMENT 
MAKE KIPDR3 RESIDENT 
RESET STACK POINTER 



CKicTBOO 11/44 MEH HG«T PRT B HACRO H1113 12-JAN-82 12:19 
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G 8 
PAGE 75 



SEQUENCE 97 



3186 



026272 

3187 026274 

3188 026300 

3189 026306 

3190 026314 

3191 026322 
3192 

3193 

3194 026326 

3195 026330 

3196 026332 

3197 026334 

3198 026340 

3199 026346 
3200 

3201 

3202 026352 

3203 026360 

3204 026364 

3205 026370 

3206 026374 
3207 

3208 

3209 026400 

3210 026406 

3211 026412 

3212 026416 

3213 026422 

3214 026426 

3215 026434 
3216 

3217 

3218 026440 

3219 026446 

3220 026454 

3221 026460 

3222 026464 

3223 026470 

3224 026474 
3225 

3226 

3227 026500 

3228 026506 

3229 026512 

3230 026516 

3231 026522 

3232 026526 



000004 
105037 
012737 
012737 
052737 
005237 



000400 
005700 
005200 
005037 
112737 
105037 



012737 
005237 
005737 
005037 
005037 



012737 
012700 
005237 
023710 
052730 
013737 
005037 



012737 
012737 
012700 
005237 
006137 
072337 
005037 



012737 
005237 
070037 
000337 
005037 
042737 



m222 
026326 
000022 
040000 
177572 



177572 
000006 
172206 



026364 
177572 
060000 
060000 
177572 



026416 
060000 
177572 
060000 
000000 
060002 
177572 



026464 
000001 
000001 
177572 
060000 
060000 
177572 



026512 
177572 
060000 
060004 
177572 
000002 



001110 
V2516 
177776 



172222 
001110 



001110 



060002 



001110 
060000 



001110 



172516 



s8ttl test • 16 - proper enabling of super. d-space 
West 16 

* 

* ANY ERRORS ENCOUNTERED WILL BE REPORTED THROUGH 'WVEC TO 

* 

TST16: SCOPE 



PROPER ENABLING OF SUPER. D-SPACE 

THIS TEST CHECKS FOR PROPER ENABLING OF THE SUPERVISOR D-SPACE, 

ANY ERRORS ENCOUNTERI 
SUBROUTINE 'NODSPAC 



20$: 



2$: 



3$: 



• * 



4$: 



51; 



6$: 



CLRB 

MOV 

MOV 

BIS 

INC 



SDPDR1 
#1$ ,fLPERR 
#22.MMR3 
*40000,PSW 
MMRO 



MA<E SDPDR' '•ON-'^EblDENT 
SET LOOP ON ERRO POINTER TO 1$ 
ENABLE 22-81^ SUPlRVISOR D-SPACE 
ENABLE SUPERVISOR MODE 
TURN ON MEMORY MANAGEMENT 



THE NEXT INSTRUCTIONS SHOULD NEVER INVOKE D-SPACE 



BR 

TST 

INC 

CLR 

M0V8 

CLRB 



2S 

RO 
RO 

MMRO 

#6.SDPDR1 
SIPDR3 



TEST SOP INSTRUCTIONS 



MOV 

INC 
TST 
CLR 
CLR 



#3$.$LPERR 
MMRO 
a#60000 
i4r60000 
MMRO 



TEST DOP INSTUCTIONS 

MOV «4S.$LPERR 

MOV #60000. RO 

INC MNRO 

CMP a#60000,(RO) 

BIS #0,a(RO)«- 

MOV a#60002,a#60002 

CLR HMRO 

TEST ROT/SHFT AND ASH/ASHC INSTRUCTIONS 



TURN OFF MEMORY MANAGEMENT 
MAKE SDPDR1 RESIDENT 
MAKE SIPDR3 NON-RESIDENT 



SET LOOP ON ERROR POINTER TO 3$ 
TURN ON MEMORY MANAGEMENT 
DSTM=3 DSTF=7 SOP NON-MOD 
DSTM=3 DSTF=7 SOP MOD 
TURN OFF MEMORY MANAGEMENT 



SET LOOP ON ERROR POINTER TO 4$ 
SET UP CONSTANT FOR TEST 
TURN ON MEMORY MANAGEMENT 
SRCM=3 DSTM=1 DOP DEST NON-MOD 
SRCM=2 DSTM=3 DOP DEST MOD 
SRCM=3 DSTM=3 MOV DEST 
TURN OFF MEMORY MANAGEMENT 



MOV 
MOV 
MOV 
INC 
ROL 
ASH 
CLR 



#5$.$LPERR 
#1,84^60000 
#1.R0 
MMRO 
a#60000 
a#60000.R3 
MMRO 



TEST MUL/DIV AND SWAB INSTRUCTIONS 



SET LOOP ON ERROR POINTER TO 5$ 

SET CONSTANT FOR TEST 

SET UP CONSTANT FOR TEST 

TURN ON MEMORY MANAGEMENT 

0STM=3 ROT/SHFT 

DSTM=3 ASH/ASHC 

TURN OFF MEMORY MANAGEMENT 



MOV 

INC 

MUL 

SWA8 

CLR 

SIC 



#6$.$LPERR 
MMRO 

»r60000,R0 
i#60004 
MMRO 
#2.MMR3 



SET LOOP ON ERROR POINTER TO 6$ 
TURN ON MEMORY MANAGEMENT 
DSTM=3 MUL/DIV 
DSTM=3 SWAB 

TURN OFF MEMORY MANAGEMENT 
DISABLE SUPERVISOR D-SPACE 



H 8 

CKKTBDO HEH MGMT PRT B MACRO H1113 12-JAN-82 12:19 PAGE 75-1 SCOUEWCE 

TtST # 16 - PROPER ENABLING OF SUPER. D-SPACE 

3235 026534 112737 000006 172206 H0V8 #6.S]PDR3 ;«AkE SIP0R3 RESIDENT 



CKI^TBDO 11/^4 MEM nCMT PRT B HACRO H1 11 3 
TEST « 17 - PROPER ENABLING OF USER 0-SPACE 
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I 

76 



SEQUENCE 99 



3242 



026542 

3243 026544 

3244 026550 

3245 026556 

3246 026564 

3247 026572 
3248 

3249 

3250 026576 

3251 026600 

3252 026602 

3253 026604 

3254 026610 

3255 026616 
3256 

3257 

3258 026622 

3259 026630 

3260 026634 

3261 026640 

3262 026644 
3263 

3264 

3265 026650 

3266 026656 

3267 026662 

3268 026666 

3269 026672 

3270 026676 

3271 026704 
3272 

3273 

3274 026710 

3275 026716 

3276 026724 

3277 026730 

3278 026734 

3279 026740 
3280 

3281 

3282 026744 

3283 026752 

3284 026756 

3285 026762 

3286 026766 

3287 026772 

3288 026776 



000004 
105037 
012737 
012737 
052737 
005237 



000400 
005700 
005200 
005037 
112737 
105037 



012737 
005237 
005737 
005037 
005037 



012737 
012700 
005237 
023710 
052730 
013737 
005037 



012737 
012737 
005237 
006137 
072337 
005037 



012737 
012700 
005237 
070037 
000337 
005037 
042737 



177622 
026576 
000021 
140000 
177572 



177572 
000006 
1 77606 



026634 
177572 
060000 
060000 
177572 



026666 
060000 
177572 
060000 
000000 
060002 
177572 



026730 
000001 
1 77572 
060000 
060000 
}77S72 



026762 
000001 
^77S72 
060000 
060004 
177572 
000001 



001110 
172516 
^77776 



^77622 
001110 



001110 



060002 



001110 
060000 



001110 



172516 



.SBTTL TEST # 17 - PROPER ENABLING Of USER 0-SPACE 



PROPER ENABLING OF USER D-SPACE 



•TEST 17 

* THIS TEST CHECKS FOR PROPER ENABLING OF THE USER D-SPACE. 

* ANY ERRORS ENCOUNTERED WILL BE REPORTED THROUGH 'MHVEC' TO 

* SUBROUTINE 'NODSPAC. 
* 



**** 

TST17: 
20$: 



1$: 
2$: 



3$: 



4S: 



5$: 



6S: 



*********************************************************** 

SCOPE 

MAKE UDPDR1 NON-RESIDENT 
SET LOOP ON ERROR POINTER TO 1$ 
ENABLE 22-81 T USER 0-SPACE 
ENABLE USER MODE 
TURN ON MEMORY MANAGEMENT 



CLR8 UDPDR1 
MOV *1$,$LPERR 
MOV *21 -MMR3 
BIS #140000, PSU 
INC MMRO 

THE NEXT INSTRUCTIONS SHOULD NEVER INVOKE D-SPACE 



BR 

TST 

INC 

CLR 

M0V8 

CLR8 



2$ 

RO 
RO 

MMRO 

#6,UDPDR1 
UIPDR3 



TEST SOP INSTRUCTIONS 



MOV 
INC 
TST 
CLR 
CLR 



#3$.$LPERR 
MMRO 
a4r60000 
a#60000 
MMRO 



TEST OOP INSTUCTIONS 

MOV #4$.$LPERR 

MOV #60000, RO 

INC MMRO 

CMP a#60000.(RO) 

BIS #0,a(RO)«- 

MOV a#60002,i#60002 

CLR MMRO 
TEST ROT/SHFT AND ASH/ASHC INSTRUCTIONS 



TURN OFF MEMORY MANAGEMENT 
MAKE UDPDR1 RESIDENT 
MAKE UIPDR3 NON-RESIDENT 



SET LOOP ON ERROR POINTER TO 3$ 
TURN ON MEMORY MANAGEMENT 
DSTM=3 DSTF=7 SOP NON-MOO 
DSTM=3 0STF=7 SOP HOD 
TURN OFF MEMORY MANAGEMENT 



SET LOOP ON ERROR POINTER TO 4$ 
SET UP CONSTANT FOR TEST 
TURN ON MEMORY MANAGEMENT 
SRCM=3 0STM=1 OOP DEST NON-MOD 
SRCM=2 DSTM=3 OOP DEST MOO 
SRCM=3 0STM=3 MOV DEST 
TURN OFF MEMORY MANAGEMENT 



MOV 
MOV 

INC 
ROL 
ASH 
CLR 



#5$,$LPERR 
#1,i#60000 
MMRO 
a#60000 
a#60000,R3 
MMRO 



TEST MUL/DIV AND SWAB INSTRUCTIONS 



SET LOOP ON ERROR POINTER TO 5$ 

SET CONSTANT FOR TEST 

TURN ON MEMORY MANAGEMENT 

0STM=3 ROT/SHFT 

DSTM=3 ASH/ASHC 

TURN OFF MEMORY MANAGEMENT 



MOV 
MOV 

INC 

MUL 

SWA8 

CLR 

6IC 



#6S,SLPERR 

#1.R0 

WRO 

a«60000.RO 
a#60004 
MMRO 
*i.MMR3 



SET LOOP ON ERROR POINTER TO 6$ 
SET UP CONSTANT FOR TEST 
TURN ON MEMORY MANAGEMENT 
0STM=3 MUL/DIV 
0STM=3 SWAB 

TURN OFF MEMORY MANAGEMENT 
DISABLE USER 0-SPACE 



J 8 

CRKTBDO n/U MEM MG«T PRT B MACRO Ml 115 12-JAN-82 12:19 PAGE 76-1 SEQUENCE 
TEST » 17 - PROPER ENABLING OF USER D-SPACE 

3?89 02?004 112737 000006 177606 H0V9 *6.UIPDR3 'S^I^It^JKIbSaP^cp!?? 

3290 027012 005037 177776 CLR PSW .-RESET TO KERNAL SPACE 



CKKTBDO MEM MGMT PRT B MACRO Ml 113 

TEST # 20 - TRAPPING IN D-SPACE ICERNAL MODE 



12-JAN-8? 12:19 



K 8 
PAGE 77 



SEQUENCE 101 



3299 



027016 

3300 027GdO 

3301 027024 

3302 027032 

3303 0270A0 

3304 027044 

3305 027052 

3306 027060 

3307 027064 
3308 

3309 

3310 027070 

3311 027076 

3312 027104 

3313 027112 

3314 027120 

3315 027126 

3316 027132 

3317 027134 

3318 027140 

3319 027144 

3320 027150 

3321 027156 

3322 027162 
iJdS 027166 

3324 027172 

3325 027176 

3326 027200 

3327 027202 
3328 

3329 027206 

3330 027210 

3331 027212 

3332 027216 

3333 027224 
3334 



000004 
004737 
012737 
012737 
005037 
012737 
012737 
012706 
005237 



S3TTL TEST # 20 - TRAPPING IN D-SPACE KERNAL MODE 
'test 20 TRAPPING IN D-SPACE KERNAL MODE 



002356 
027060 
027126 
000252 
027134 
000340 
001000 
177572 



THIS TES 
D-SPACE 
10$ AND 
VIRTUAL 
AREA IT 
************** 

TST20: SCOPE 



T VERIFIES THAT THE ABORT VECTOR IS TAKEN FROM 
AND NOT I-SPACE. THE I-SPACE VECTOR POINTS TO 
THE D-SPACE VECTOR POINTS TO 15$. EACH PSW IN 
252 IS DIFFERENT SO THE PROGRAM CAN TELL WHICH 
IS PICKED UP FROM. 

************************************************* 



001110 
000250 

000350 
000352 



JSR 
20$: MOV 
MOV 
CLR 
MOV 
MOV 

1 $ : MOV 
INC 

;NOW SET UP FOR 



PC, TOFF 
#1$.$LPERR 
*10$,a#MMVEC 
a#MMVEC*2 
#15$.a#350 
*340.a*352 
#1000. KSP 
MMRO 



TURN OF T-BIT FOR THIS TEST 
SET LOOP ON ERROR POINTER TO 1$ 
SET M.M. VEC. TO HOLD BAD VECTOR 
PSW IN 252 HAS PRIORITY OF ZERO 
SET D-SPACE M.M VECTOR TO 350 
SET PSW PRIORITY TO 7 
SET UP KERNAL VECTOR 
TURN ON MEMORY MANAGEMENT 



AN ABORT IN KERNAL MODE WITH D-SPACE ENABLED 



012737 


077402 


172330 




MOV 


#77402, KDPDR4 


KERNAL D-SPACE PAGE 4 IS READ ONLY 


012737 


000600 


172370 




MOV 


#600.KDPAR4 


MAP D-SPACE PAGE 4 TO 12K 


052737 


000004 


172516 




BIS 


#8IT2,MMR3 


ENABLE KERNAL D-SPACE NAPPING 


012737 


000001 


172360 




MOV 


#1 ,KDPARO 


■MAP KERNAL D PAGE 0 TO 000100 


012737 


^77777 


100000 




MOV 


#-1,a#1 00000 


TRY TO WRITE TO PAGE 4 


013700 


y7777b 




10$: 


MOV 


PSW.RO 


SAVE PSW FOR COMPARE 


000402 








BR 


16$ 


BRANCH TO D-SPACE READ CODE 


013700 


^7777h 




15$: 


MOV 


PSW.RO 


SAVE PSW FOR COMPARE 


005037 


172360 




16$: 


CLR 


KDPARO 


■REMAP KERNAL D PAGE 0 TO PHYSICAL 0 


012706 


001100 






MOV 


#KERSTK,KSP 


RESET STACK POINTER AFTER D-SPACE ABORT 


042737 


000004 


172516 




BIC 


#8JT2.MMR3 


■TURN OFF KERNAL D-SPACE ENABLE 


013701 


\77^72 






MOV 


MMftO,R1 


SAVE MWO FOR COMPARE 


013702 


\7757k 






MOV 


MMfi1.R2 


SAVE MMRl FOR COMPARE 


013703 


m^7fi 






MOV 


MMR2,R3 


•SAVE MW2 FOR COMPARE 


122700 


000340 






CHP8 


#340,R0 


■DID YOU PICK CORRECT PSW 


001401 








BEO 


2$ 


•BRANCH IF PSW IS 340 


104033 








ERROR 


♦33 


■WRONG PSW PICKED IN ABORT SEQUENCE 


022701 


020031 




2$: 


CMP 


#020031. R1 


■EXPECTING READ ONLY ABORT 
•KERNAL MODE D-SPACE PAGE 4 


001401 








BEQ 


3$ 


•BRANCH IF CONDITION IS CORRECT 


104027 








ERROR 


*27 


■WRONG M.M. ABORT CONDITION 


005037 


177572 




3$: 


CLR 


MMRO 


■CLEAR OFF MMRO FOR EXIT OF TEST 


012737 


016142 


000250 




MOV 


#M6MERR,MMVEC 


;RESTORE NORMAL M.M. TRAP VECTOR 


012737 


000340 


000252 




MOV 


#340.MMVEC*2 


jRESTORE TRAP PSW (PRI0RITY=7) 



CKKTBDO n/4A MEM MGMT PRT B MACRO Hill 3 12-JAN-82 12:19 PAGE 78 
GROUP 3 MOVE TO/FROM PREVIOUS INSTRUCTIONS TESTS 



SEQUENCE 



3336 
3337 
3338 
3339 
3340 
3341 
3342 
3343 
3344 



S8TTL GROUP 3 HOVE TO/FROM PREVIOUS INSTRUCTIONS TESTS 
/.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\ 



THIS GROUP OF TESTS WILL TEST ALL THE LOGIC ASSOCIATED WITH 
THE 'WFPI", 'WTPI" AND 'WPO" INSTRUCTIONS. 



'/.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\./.\ 



CKtcTBDO n/4A MEM M6MT PRT 6 MACRO Ml 113 12-JAN-82 12:19 
TEST » 21 - MOVE FROM PREVIOUS (SUPERVISOR) I-SPACE 



M 8 

PAG^ 79 



SEQUENCE 1C 



3359 



3360 
3361 



336A 
3365 



027232 
027234 
027240 

3362 027246 

3363 027254 
027262 
027266 

3366 027272 
3367 

3368 027276 

3369 027304 

3370 027312 

3371 027314 

3372 027320 

3373 027322 

3374 027324 

3375 027330 

3376 027332 

3377 027334 
3378 

3379 027336 

3380 027340 
3381 

3382 
3383 

3384 027342 

3385 027350 

3386 027354 

3387 027362 

3388 027366 

3389 027374 

3390 027400 

3391 027402 

3392 027404 

3393 027406 
3394 

3395 027410 

3396 027414 

3397 027420 

3398 027422 

3399 027424 



000004 
004737 
012737 
012737 
012737 
012700 
010037 
105037 

012737 
012737 
006506 
022706 
001407 
012600 
012701 
020001 
001403 
104023 

000401 
104025 



012737 
012700 
012737 
012702 
012737 
004737 
006512 
000240 
104023 
005726 

012702 
004737 
006522 
000240 
104023 



002060 
000001 
000600 
000600 
036514 
100000 
172310 

027304 
010340 

001100 



000700 



.S8TTL TEST # 21 - MOVE FROM PREVIOUS (SUPERVISOR) I-SPACE 



TEST 21 



MOVE FROM PREVIOUS (SUPERVISOR) I-SPACE 



THIS TEST USES THE 'MFPI* INSTRUCTION TO ENSURE THAT THE PREVIOUS MODE 
IS CLOCKED CORRECTLY. THERE IS A DESCRIPTION BEFORE EACH DESTINATION 
MODE TESTED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE MFPiTS, 
WHICH USES THE MFPI INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST. •IMPORTANT* - ALL 'TlOP'S" FOLLOWING MFPI'S OF MODES 1,2, 
4 AND 5 ARE TO BE LEFT ALONE. THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL, PREPARING FOR MODES 3, 6 AND 7. 

IF THE CORRECT MODE (SUPERVISOR) IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO MFPIVl, WHERE THE ERRORS ARE REPORTED. 



177572 
172350 
172250 



001110 
177776 



TST21: SCOPE 

JSR PCAPRINIT 

MOV irl ,/1MR0 

1$. MOV #600,KIPAR4 

MOV #600.SIPAR4 

MOV »36514.R0 

MOV R0,a4n 00000 

CLR6 KIPDR4 



;THE FOLLOWING WILL TEST DSTM=0 MFPI 



INIT ALL PAR/PDR'S 
TURN ON MEMORY MANAGEMENT 
MAP KIPAR4 TO 12K 
MAP SIPAR4 TO 12K 
LOAD DATA PATTERN INTO RO 
LOAD DATA PATTERN INTO PHY 60000 
;MAKE KERNEL I-SPACE PAGE 4 NON-RESIDENT 



2$: 



MOV 
MOV 
MFPI 
CMP 
BEQ 
MOV 
MOV 
CMP 
BEQ 
ERROR 



#2$,$LPERR 
#010340, PSW 
SSP 

#KERSTK.KSP 
3$ 

(KSP)*,RO 
#SUPSTK.R1 
R0,R1 
4$ 
♦23 



SET LOOP ON ERROR POINTER TO 2$ 
MAKE PREVIOUS MODE SUPERVISOR 
PUT SUPERVISOR STACK POINTER ON KERNEL STACK 
WAS SOMETHING PUSHED ON STACK AT 6S 
BRANCH IF NOTHING WAS PUSHED 
POP KERNEL STACK INTO RO 
EXPECTING TO GET 700 AS SSP 
DID YOU GET THE RIGHT POINTER? 
BRANCH IF YOU DID 
WRONG THING WAS PUSHED ON STACK 



.FOR TIGHTER SCOPE LOOP, REPLACE 'BEQ 4$" WITH 'BR 2$" = 000764 



3$: 



BR 

ERROR 



4$ 

♦25 



.-BRANCH TO NEXT TRY 
.■NOTHING PUSHED ON STACK 



.FOR TIGHTER SCOPE LOOP. REPLACE 'BEQ 3$" ABOVE WITH 'BR 2$" = 000771 



002516 001110 
036514 

010340 002520 
100000 

027566 002622 
002464 



100000 
002464 



.-THE FOLLOWING 
4$: MOV 
MOV 
MOV 
MOV 
MOV 
JSR 
MFPI 
NOP 
ERROR 
TST 

.THE FOLLOWING 
MOV 
JSR 
MFPI 
NOP 
ERROR 



WILL TEST DSTM=1 
#MFPILP,$LPERR 
#36514.R0 
#010340. MFPIPS 
#1 00000, R2 
#MFPIV1,MFPIVC 
PC. MFPITS 
(R^) 

♦23 
(SP)^ 
WILL TEST DSTM=2 
#100000,R2 

pc .mfpits 
(rJ)^ 

♦23 



MFPI. 

SET LOOP ON ERROR POINTER TO MFPILP IN SUBROUTINE 
RELOAD DATA PATTERN IN RO 
MAKE PREVIOUS MODE SUPERVISOR IN SUBROUTINE 
LOAD VIRTUAL ADDRESS INTO R2 

LOAD ADDRESS OF THIS TEST'S TRAP CATCHER TO MFPlVC 
GO DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
MODE NOT 3, 6 OR 7 - NEEDED FOR SUBROlTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING MFPI INSTRUCTION FOUND 

<HERE - READ FROM PHYSICAL 60000 

MODE NOT 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 



CKKI8D0 11 /AA MEM l«IGMT PRT 6 
TEST # 21 - MOVE FROM PREVIOUS 



MACRO Ml 113 12-JAN-82 12:19 PAGE 
(SUPERVISOR) I-SPACE 



N 8 

79-1 













TCT 


5*»U 1 








• TUF 

. 1 nc 


r ULLUVti'lU 






UUc'»0'» 






ICR 






1 UV/UUU 






MFPI 












CDRnO 
c npiu" 




CO 








TCT 

1 J 1 












Fni 1 nuiiur 






1 nnnn? 






HU V 




nf\L7X7 


UUc*iOh 






1 CR 




UUo3*«c 








MFPT 


5h I U Uc r •» JO 










MnP 


iz. 1 1 r\07Lf^f\ 
1 1 uc I hou 


1 nz.n?7 








c nnun 


J*« t c Uc ' Hoc 


UV/3 r CO 










XL. 1 1 








• TUP 


r ULLUWiniO 


jH 1 *• \JC 1 *tO*« 


ni ?777 


1 nnnnn 


\J\l I CVC 




no ¥ 


'IZ.I^ 057^75 

>*♦ 1 J Ut f H f C 




nni 7(\L 






MOV 

no V 






Art?//!,/ 






KR 
J an 




VUO J J c 








nr r i 




UUV/cH U 








Nnp 




1 UhUc J 








FRRQR 




U*.' J r CO 








TCT 










g 1 nc 


Fni 1 niJiN(^ 

TOLL Oaf i no 












'1 R 




UU«t f Of 








I^R 


XL^L n?7S?n 


UUo JOc 


1 nnooo 






MFPI 


7^?s n?7S?^ 


1 V/HV/C J 








FRROR 




UU J ICO 










X^?7 








t 1 nc 






ni ?7?7 


inonnn 


nni 

V/O 1 C VC 






J*«C7 Ucr JJO 


ni ?7n? 

U 1 C r UC 


nni ?o? 

UU I CvC 






MOV 


3A30 027542 


004737 


002464 






JSR 


5A31 0275A6 


006572 


000000 






MFPI 


3A32 027552 


104023 








ERROR 


3433 027554 


005726 








TST 


3434 027556 


112737 


000006 


172310 




M0V8 


5435 027564 


000423 








8R 



(SP)* 
yiLL TEST DSTM=3 

PC, MFPI TS 

a# 100000 

♦23 

(SP)* 
WILL TEST DSTM=4 

#1 00002. R2 

PC.MFPITS 

-(R2) 

♦23 
(SP)> 
WILL TEST DSTM=5 
#100000, $TMP2 
#<$TMP2*2>,R2 
PC.MFPITS 
a-(R2) 

♦23 
(SP) + 
WILL TEST DSTM=6 
R2 

PC.MFPITS 
100000(R2) 
♦23 
(SP)^ 
WILL TEST DSTM=7 
#1 00000. $TMP2 
#$TMP2.R2 
PC.MFPITS 
aO(R2) 
♦23 
(SP)^ 
#6.KIPD'?4 
TST22 



SEQUENCE 104 



.POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

60 DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 
60 DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
MODE NOT 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WR0N6 DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD TEST LOC. VIRT. ADDR INTO LOC. $TMP2 
LOAD ADDR. OF $TMP2^2 INTO R2 
GO DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
MODE NOT 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

MAKE REGISTER 2 A ZERO 
GO DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD TEST LOC. V.A. INTO $TMP2 

LOAD ADDRESS OF $TMP2 INTO R2 

60 DO TEST USIN6 MFPI INSTRUCTION FOUND 

USE $TMP2 TO FETCH VIRTUAL ^DDRESS OF 60000 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MAKE KIPDR4 RESIDENT 

.-BRANCH TO NEXT TEST 



tlcTBDO 11/44 nm HGHT PRT B 
V* TRAP CATrnER fQR ABOVE TEST 



5A5« 027566 
5A59 027572 
5440 027576 
027604 
5A42 027612 
3^43 027620 
3A44 

3A45 027622 
3446 027626 
344 7 027632 



•MCRC "11113 12-JAN-82 12:19 PAGE 



B 

80 





001260 




MFPIVI ■ MOV 


01 2637 






MOW 


01 3737 


1 77572 


001264 


MOV 


013737 


177576 


001270 


MOV 


042737 


160000 


177572 


BIG 


104026 






ERROR 








;FOR TIGHTER 


013746 


001262 




MOV 


013746 


001260 




MOV 


000002 






RT] 



SfCJufNCf 



1 " i 



.S8TTL m TRAP CATCHER 
(>CSP)»,TRAPPC 
(>CSP)*,TRAPPS 
SRO.WASSRO 
SR2-UASSR2 
#160000. SRO 
♦26 

SCOPE LOOP. REPLACE 
TRAPPS.-(ICSP) 
TRAPPC.-(KSP> 



FOR ABOVE TEST 
.-SAVE PC t PS OF 



TRAP 



.■SAVE SRO FOR ERROR TYPEOUT 
.•SAVE SR2 FOR ERROR TYPEOUT 
.•CLEAR ERROR BITS IN SRO AND LEAVE 
.•TRIED TO READ NON-RESIDENT PAGE 

1ST MOV INSTRUCTION WITH AN "RTI" = 000002 
.-PUT PC t PS OF TRAP ON STACK 



CKKTBDO 11/44 ME« «GHT PRT B NACRO HH 
TEST # 22 - HOVE FROM PREVIOUS (USER) I-S 

3462 



3463 
3464 
3465 
3466 
3467 
3468 
3469 
3470 
3471 
3472 
3473 
3474 
3475 
3476 
3477 
3478 
3479 
3480 
3481 
3482 
3483 
3484 
3485 
3486 
3487 
3488 
3489 
3490 
3491 
3492 
3493 
3494 
3495 
3496 
34 97 
3498 
3499 
3500 
3501 
5502 



027654 
027636 
027642 
027650 
027654 

027660 
027666 
027674 
027702 
027704 
027712 
027n6 
027720 
027722 
027726 
027730 
027732 

027734 
027736 



027740 
027746 
027754 
027760 
027766 
027772 
027776 
030000 
030002 
030004 

030006 
030012 
030016 
030020 
030022 
030024 



000004 
012700 
012737 
010037 
105037 

012737 
012737 
012737 
006506 
012737 
022706 
001007 
012600 
012701 
020001 
001403 
104023 

000401 
104025 



012737 
012737 
012700 
012737 
012702 
004737 
006512 
000240 
104023 
005726 

012702 
004737 
006522 
000240 
104023 
005726 



036514 
000600 
100000 
172310 

027666 
030340 
030164 

016142 
001076 



000600 



002516 
030340 
036514 
030164 
100000 
002464 



100000 
002464 



3 12-JAN-82 12:19 PAGE 
ACE 



C 

81 



SEQUENCE K 



8TTL TEST 0 22 - HOVE FROH PREVIOUS (USER) I-SPACE 
TEST 22 HO' FROH PREVIOUS (USER) I-SPACE 



THIS TEST USES THE 'HFPI' INSTRUCTION TO ENSURE THAT THE PREVIOUS HODE 
IS CLOCKED CORRECTLY. THERE IS A DESCRIPTION BEFORE EACH DESTINATION 
HODE TESTED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE HFPITS. 
WHICH USES THE HFPI INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST. •IHPORTANT* - ALL "HOP'S" FOLLOWING HfPI'S OF HODES 1.2, 
4 AND 5 ARE TO BE LEFT ALONE. THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSH CALL. PREPARING FOR HODES 3. 6 AND 7. 

IF THE CORRECT HODE (USER) IS NOT ENABLED A NON-RESIDENT ABORT WILL 
OCCUR AND TRAP TO HFPIV2. WHERE THE ERRORS ARE REPORTED. 



177650 



001110 
177776 
000250 

000250 



TST22: SCOPE 
1$: HOV 
HOV 
HOV 
CLRB 



*36514.R0 
#600.UIPAR4 
RO.a^l 00000 
KIPDR4 



.-THE FOLLOWING WILL TEST DSTH=0 HFPI 



LOAD DATA PATTERN INTO RO 
HAP UIPAR4 TO 12K 
LOAD DATA PATTERN INTO PHY 60000 
HAKE KERNEL I-SPACE PAGE 4 NON-RESIDENT 



HOV *2$.$LPERR 

2$: HOV #030340. PSW 

HOV *HF PI V2.HHVEC 

HFPI USP 

HOV #HGHERR.HHVEC 

CHP #KERSTK-2,KSP 

BNE 3S 

HOV (KSP)*.RO 

HOV #USESTK.R1 

CHP R0.R1 

6E0 4$ 

ERROR +23 



SET LOOP ON ERROR POINTER TO 2$ 
HAKE PREVIOUS HODE USER 

LOAD ADDRESS OF THIS TEST'S TRAP CATCHER TO HHVEC 
PUT USER STACK POINTER ON KERNEL STACK 
SET H.H. VECTOR TO NORHAL ROUTINE 
WAS SOMETHING PUSHED ON STACK BY THE HFPI? 
BRANCH TO ERROR IF POINTER IS WRONG 
POP KERNEL STACK INTO RO 
EXPECTING TO GET 600 AS U<^° 
DID YOU GET THE RIGHT POINTER? 
BRANCH IF YOU DID 
WRONG THING WAS PUSHED ON STACK 



001110 
002520 

002622 



;FOR TIGHTER SCOPE LOOP. REPLACE 'BEG 4$" WITH 'BR 2$" = 000764 

BR 4$ .-BRANCH TO NEXT TRY 

3$: ERROR +25 .-NOTHING PUSHED ON STACK 

.-FOR TIGHTER SCOPE LOOP. REPLACE 'BNE 3$" ABOVE WITH 'BR 2$" = 000771 
.-THE FOLLOWING WILL TEST DSTH=1 HFPI. 

4$: 



HOV #HFPJLP.$LPERR 

HOV #030340. HFPI PS 

HOV #3651 4. RO 

HOV #HFPJV^.HFPIVC 

HOV #1 00000, R2 

JSR PC.HFPITS 

HFPI (R2) 
NOP 

ERROR +23 

TST (SP)* 

.-THE FOLLOWING WILL TEST DSTH=2 



HOV 

JSR 
HFPI 
NOP 
ERROR 

TST 



#1 00000, R2 
PC. HFPI TS 
(R2)* 

♦23 
(SP)* 



.•THE FOLLOWING WILL TEST DSTH=3 



SET LOOP ON ERROR POINTER TO HFPILP IN SUBROUTINE 
HAKE PREVIOUS HODE USER IN SUBROUTINE LOCATION 
RELOAD DATA PATTERN IN RO 

LOAD ADDRESS OF THIS TEST'S TRAP CATCHER TO HFPIVC 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING HFPI INSTRUCTION FOUND 
<HERE - READ FROH PHYSICAL 60000 
HODE NOT 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
HFPI. 

LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING HFPI INSTRUCTION FOUND 
<HERE - READ FROH PHYSICAL 60000 
HODE NOT 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
HFPI. 



CKKTBDO ntn MGHT PRT B KACRO M1113 12-JAN-82 12;19 PAGE 

TEST » 22 - HOVE FROM PREVIOUS (USER) I-SPACE 



D 9 

81-1 



3503 0300<f6 


004737 


A A ^ 1 d 1 

00t464 






1 C A 

JSR 


F\F MP A 1 T C 

PC ,MFP1 TS 


350A 030032 


006537 


4 AAAAA 

1 00000 






MFPJ 


M 4 AAAAA 

a#i 00000 


3505 030036 


104023 








ERROR 


♦23 


3506 0300A0 


005726 








T t* T 

TST 


(SP; ♦ 


3507 








; THE 


F Al 1 Al 1 V ft 1^ 

FOLLOUING 


WILL TEST DSTn- 


3508 030042 


A 4 1 ^ A ^ 

0-2702 


4 AAAA*^ 

1 00002 






MOV 


M 1 A AAA 1 r> T 

#100002, R2 


3509 0300A6 


A A / 

004737 


002464 






JSR 


AT MPAITC 

PC ,MFPI TS 


3510 030052 


AA^ C i ^ 

006542 








Mr A f 

MFPJ 


-(R2) 


7C 4 4 AVAAC/ 

3511 03005A 


AAA y A 

000240 








NOP 




3512 030056 


4 A/ A^** 

104023 








r A A An 

ERROR 


^ OT 

♦25 


3513 030060 


AAC ^"^^ 

005726 








T t* T 

TST 


(SP; + 


551*1 








; THE 


F Ai 1 Ai 1 f 

FOLLOUING 


WILL TEST DSTM 


1 C ATAA^ 1 

3515 030062 


A1 


4 AAAAA 

1 00000 


AAI "iAT 

001 202 




MOV 


J*1AAAAA ^TMA^ 

*10U000,»TMP<:! 


5516 030070 




AAi '\f\i 

001204 






MOV 


#<»THP2+2> ,R2 


7C 4 ^ A7AA^/ 

3517 030074 


A A / 

004757 


AA^y £. t 

002464 






JSR 


A p MP n ff T P 

PC.MFPITS 


7C4Q A9A4 AA 

5518 030100 


AAZ C C 1 

006552 








MFPI 


a-(R2) 


5519 030102 


AAA"1 y A 

000240 








NOP 




TC^A ATAlAy 

3520 03010s 


1 A/ AT* 

104025 








P A A A A 

ERROR 


♦23 


ATA1 AZ 

3521 050106 


AAC ^'i^ 

005726 








T T 

TST 


(SP; ♦ 


55<:<: 








. TLIC 

; THc 


f At 1 Al 1 T ftl^ 

FOLLOUING 


tlTI 1 TCCT ncTM 

WILL TtST DSTn 


5525 050110 


AAC AA 1 

005002 








P 1 A 

CLR 


ri O 
He 


■?Cr>/ ATAI 1 O 

5524 050112 


AA/ 7T7 

004/^5/^ 


AA^ / £. / 

002464 






1 A 

JSR 


or Mr o T T c 

PC -MFPI TS 


5525 030116 


AA^ O 

00c56c 


1 AAAAA 

1 00000 






Mr A f 

HFPI 


lOOOOUtRcJ 


5526 030122 


1 A/ AOT 

1040<:5 








C A AAA 

ERROR 


+*:5 


DJdf 05Ulc*» 


UUjf CO 








T C T 


iSP; ♦ 










■ TLlC 

; iHc 


r Al 1 Al 1 T Kir" 

r ULLUWiNG 


WILL TEST DSin 


7C "OO A1A1 

35<:y U5Ul<ro 


A1 


1 AAAAA 

lyuuuu 


AAI "5 AO 




MAI/ 


Ml AAAAA CTMDO 

*1000UU,»TnP^ 


5530 050154 


A1 •^7A'5 

012702 


AAI TAO 

001 iSjc 






nov 


il# T Mn A ^ 


jj J 1 U jU I su 




UUcSPM 






1 CO 
Jon 


or MroTTC 


3532 030144 


006572 


0000^ J 






MFPI 


aO(R2) 


3533 030150 


104023 








ERROR 


+23 


5534 030152 


005726 








TST 


(SP)* 


3535 030154 


112737 


000006 


172310 




M0V8 


#6.KJP0R4 


3536 030162 


000423 








BR 


TST23 



=4 



=6 



SEQUENCE ' 



GO DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
RETURN IS EHRE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 
60 DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
MODE NOT 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD TEST LOC. VIRT. ADDR INTO LOC. ITHP2 
LOAD ADDR. OF $TMP2+2 INTO R2 
60 DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
MODE NOT 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

MAKE REGISTER 2 A ZERO 
GO DO TEST USING MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD TEST LOC. V.A. INTO JTMP2 

LOAD ADDRESS OF $TMP2 INTO R2 

GO DO TEST USING MFPI INSTRUCTION FOUND 

USE tTMP2 TO FETCH VIRTUAL ADDRESS OF 60000 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

MAKE KIPDR4 RESIDENT 

.-BRANCH TO NEXT TEST 
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82 



SEQUENCE TOe 



3538 

3539 030164 
35A0 030170 

3541 030174 

3542 030202 

3543 030210 

3544 030216 
3545 

3546 030220 

3547 030224 

3548 030230 



012637 
012637 
013737 
013737 
042737 
104026 

013746 
013746 
000002 



001260 
001262 
177572 
177576 
160000 



001262 
001260 



MFP1V2: 



001264 
001270 
177572 



.FOR 



.SBTTL 
MOV 
MOV 
MOV 
MOV 
BIC 
ERROR 



TRAP CATCHER FOR PREVIOUS TEST 



(ICSP)*.TRAPPC 
(»(SP)*,TRAPPS 
SRO.UASSRO 
SR2.WASSR2 
#160000, SRO 
♦26 



.•SAVE PC t PS OF TRAP 



.•SAVE SRO FOR ERROR TYPEOUT 
;SAVE SR2 FOR ERROR TYPEOUT 
.•CLEAR ERROR BITS IN SRO AND LEAVE 
.TRIED TO READ NON-RESIDENT PAGE 
TIGHTER SCOPE LOOP. REPLACE 1ST MOV INSTRUCTION WITH AN "RTI" = 000002 
MOV TRAPPS.-(KSP) ;PUT PC t PS OF TRAP ON STACK 
MOV TRAPPC,-(KSP) 
RTI 
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SEQUENCE 1C 



3563 



030232 
3564 030234 
3565 

3566 030242 

3567 030250 

3568 030254 

3569 030262 

3570 030264 

3571 030266 

3572 030274 

3573 030276 

3574 030302 

3575 030304 
3576 

3577 030306 

3578 030314 

3579 030320 

3580 030326 

3581 030330 

3582 030336 

3583 030336 

3584 030344 

3585 030352 

3586 030356 

3587 030362 

3588 030366 

3589 030370 

3590 030372 

3591 030374 

3592 030376 
3593 

3594 030400 

3595 030404 

3596 030410 

3597 030414 

3598 030416 

3599 030420 

3600 030422 

3601 030424 
3602 

3603 030426 



,S8TTL TEST # 23 - MOVE TO PREVIOUS (SUPERVISOR) I-SPACE 
TEST 23 HOVE TO PREVIOUS (SUPERVISOR) 1-SPACE 



000004 

012737 077406 172210 

C12737 010340 177776 

012746 007777 

012737 030614 000250 

006606 

006506 

012737 016142 000250 
012601 

022701 007777 

001401 

104025 

012737 010340 177776 
012746 000700 
012737 030614 000250 
006606 

012737 016142 000250 

012737 002654 001110 

012737 010340 002656 

012702 100000 

012700 125252 

004737 002626 

006612 

000240 

000000 

10'. 024 

005726 

012700 125252 
012702 100000 
004737 002626 
006622 
000240 
177776 
104024 
005726 

012700 052525 



THIS TEST USES THE 'MTPI' INSTRUCTION TO ENSURE THAT THE PREVIOUS MODE 
IS CLOCKED CORRECTLY. THERE IS A DESCRIPTION BEfORE EACH DESTINATION 
MODE TESTED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE MFPITS, 
WHICH USES THE MTPI INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST. -IMPORTANT* - ALL 'MOP'S" FOLLOWING MTPI'S OF MODES 1.2, 
4 AND 5 ARE TO BE LEFT ALONE. THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL, PREPARING FOR MODES 3, 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MTPI VI. WHERE THE ERRORS ARE REPORTED. 



TST23: SCOPE 

1$: MOV *77406,SIPDR4 

:THE FOLLOWING WILL TEST DSTM=0 

2S: MOV «010340,PSW 

MOV M7777,'(KSP) 

MOV #MTPIV1,MMVEC 

MTPI SSP 

MFPI SSP 

MOV #MGMERR,MMVEC 

MOV (KSP)*.R1 

CMP M7777.fi} 

BEQ 3$ 

ERROR +25 
FOR TIGHTER SCOPE LOOP. REPLACE 



h: MOV #010340.PSW 

MOV #SUPSTK.-(KSP) 

MOV #MTPIV1.MMVEC 

MTPI SSP 

MOV 4mGMERR.nMVEC 
4$: .-THIS WILL TEST OSTM = 1 

MOV /TMTPILP.SLPERR 

MOV #010340. MTPIPM 

MOV #1 00000. R2 

MOV #125252. RO 

JSR PC.MTPITS 

MTPI (R2) 
NOP 

.WORD 0 

ERROR +24 

TST (SP)* 
.-THE FOLLOWING WILL TEST DSTM=2 



MOV 
MOV 

JSR 
MTPI 
NOP 
.WORD 
ERROR 
TST 



#1 25252. RO 
#1 00000. R2 
PC. MTPI TS 
(R2)* 

-2 
♦24 
(SP)* 



.-THIS WILL TEST DSTM = 3 MTPI. 



MOV 



#52525. RO 



; SUPERVISOR I-SPACE PAGE 4 READ/WRITE 
MTPI 

MAKE PREVIOUS MODE SUPERVISOR 
PUSH DATA ON KERNEL STACK 

LOAD ADDRESS OF THIS ^EST'S TRAP CATCHER TO MHVEC 
LOAD SUPERVISOR STACK POINTER 
READ SUPERVISOR STACK POINTER 
SET M.M. VECTOR TO NORMAL ROUTINE 
POP KERNEL STACK INTO R1 
WAS SUPERVISOR STACK POINTER CHANGED 
BRANCH IF It was 

SUPERVISOR STACK POINTER NOT CHANGED 
*BEQ 3$" WITH 'BR 2%" = 000765 
MAKE PREVIOUS MODE SUPERVISOR 
GET READY TO RESTORE SUPERVISOR S. POINT 
LOAD ADDRESS OF THIS TEST'S TRAP CATCHER TO MMVEC 
RESTORE SUPERVISOR STACK POINTER 
SET M.M. VECTOR TO NORMAL ROUTINE 
MTPI. 

SET LOOP ON ERROR POINTER TO MTPILP IN SUBROUTINE 
MAKE PREVIOUS MODE SUPER IN LOCATION IN SUBROUTINE 
LOAD VIRTUAL ADDRESS INTO R2 
LOAD TEST DATA INTO RO 

GO DO THE TEST USING THE MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
ADD 0 TO R2 AFTER hTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPI. 

LOAD TEST DATA INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO THE TEST USING THE MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
ADD -2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

.•LOAD TEST DATA INTO RO 
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560<. 

3605 

3606 

3607 

5608 

3609 

3610 

3611 

3612 

3613 

36K 

5615 

3616 

5617 

3618 

3619 

3620 

3621 

3622 

3623 

3624 

3625 

3626 

5627 

5628 

5629 

5630 

3651 

5632 

5655 

5654 

5655 

3636 

3637 

5638 

3659 

5640 

5641 

5642 

5645 

5644 

5645 

3646 

3647 

3648 

3649 

5650 

3651 

3652 

3653 

3654 

3655 

3656 



030432 
030436 
030442 
030444 
030446 

030450 
050454 
050460 
050464 
050466 
050470 
050472 
050474 

050476 
030502 
030506 
030514 
030520 
030522 
030524 
030526 
030530 

030552 
030536 
030540 
030544 
030550 
030552 
030554 

030556 
030562 
030570 
030574 
030600 
030604 
030606 
030610 
030612 

050614 
050620 
050624 
050652 
030640 
030646 

030650 
030654 
050660 



004757 
006637 
000000 
104024 
005726 

012700 
012702 
004757 
006642 
000240 
000000 
104024 
005726 

012700 
012702 
012737 
004737 
006652 
000240 
076576 
104024 
005726 

012700 
005002 
004737 
006662 
100000 
104024 
005726 

012700 
012737 
012702 
004737 
006672 
076576 
104024 
005726 
000423 

012637 
012637 
013737 
013737 
042737 
104024 

013746 
013746 
000002 



002626 
100000 



125252 
100002 
002626 



052525 
001204 
100000 
002626 



052525 

002626 
100000 



125252 
100000 
001202 
002626 
000000 



JSR 

HTPI 

.WORD 

ERROR 

TST 

.-THIS WILL TEST 
MOV 

nov 

JSR 

MTP] 

NOP 

.WORD 

ERROR 

TST 

.-THE FOLLOWING 
MOV 
MOV 

001202 MOV 
JSR 
MTPI 
NOP 
.WORD 
ERROR 
TST 

;THIS WILL TEST 
MOV 
CLR 
JSR 
MTPI 
.WORD 
ERROR 
TST 

.-THE FOLLOWING 
MOV 

001202 MOV 
MOV 
JSR 
MTPI 
.WORD 
ERROR 
TST 
BR 



001260 




MTPI VI: MOV 


001262 




MOV 


177572 


001264 


MOV 


177576 


001270 


MOV 


160000 


177572 


BIC 






ERROR 






;FOR TIGHTER 


001262 




MOV 


001260 




MOV 






RTI 



PC.MTPITS 

a«1 00000 

0 

♦24 

(SP)* 

DSTM = 4 MTPI. 
#125252. RO 
#100002. R2 
PC.MTPITS 
-(R2) 

0 

♦24 
(SP)* 
WILL TEST DSTM=5 
#52525.R0 
#<$TMP2*2>.R2 
#1 00000. $TMP2 
PCMTPITS 
a-(R2) 

1 00000-$ THP2 

♦24 
(SP)* 

DSTM = 6 MTPI, 
#52525. RO 

R2 

PC.MTPITS 
1 00000 (R2) 
100000 

(SP)* 
WILL TEST DSTM=7 
#1 25252. RO 
#1 00000. $TMP2 
#$THP2.R2 
PC.MTPITS 
a0(R2) 

100000-$TMP2 

♦24 

(SP)* 

TST24 

(KSP)+,TRAPPC 
(KSP) t,TRAPPS 
SRO.WASSRO 
SR2.WASSR2 
#1 60000. SRO 
♦24 

OPE LOOP. REPLACI 
TRAPPS.-(ICSP) 
TRAPPC.-(KSP) 
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;G0 DO THE TEST USING THE MTPI INSTRUCTION FOUND 
;<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
;ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
;RETURN IS HERE FOR ERROR - INCORRECT STORE 
.-POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

.-LOAD TEST DATA INTO RO 
.LOAD VIRTUAL ADDRESS INTO R2 

;G0 DO THE TEST USING THE MTPI INSTRUCTION FOUND 
;<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
.-NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
;ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
.•RETURN IS HERE FOR ERROR - INCORRECT STORE 
;POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPI. 

.•LOAD TEST DATA INTO RO 

;LOAD ADDR. OF LOC. fTMP2^2 INTO R2 

;LOAD VIRT. ADDR. OF TEST LOC. INTO STMP2 

;G0 DO THE TEST USING THE MTPI INSTRUCTION FOUND 

;<HERE - LOAD TEST DATA INTO PHYSICAL 60000 

;NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

.•ADD 100000-$TMP2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 

.•RETURN IS HERE FOR ERROR - INCORRECT STORE 

.POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

.-LOAD TEST DATA INTO RO 
;MAKE REGISTER 2 ZERO 

;G0 DO THE TEST USING THE MTPI INSTRUCTION FOUND 
;<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
.-ADD 100000 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
.RETURN IS HERE FOR ERROR - INCORRECT STORE 
.POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPI. 

.-LOAD TEST DATA INTO RO 

.-LOAD VIRT. ADDR. OF TEST LOCATION INTO LOCATION »T«P2 
.-LOAD ADDRESS OF $TMP2 INTO R2 

;G0 DO THE TEST USING THE MTPI INSTRUCTION FOUND 

;<HERE - LOAD TEST DATA INTO PHYSICAL 60000 

;ADD 100000-$TMP2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 

.•RETURN IS HERE FOR ERROR - INCORRECT STORE 

.POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

.-.•BRANCH TO NEXT TEST 

.-SAVE PC t PS OF TRAP 

;SAVE SRO FOR ERROR TYPEOUT 
.•SAVE SR2 FOR ERROR TYPEOUT 
.•CLEAR ERROR BITS IN SRO 
.•TRIED TO LOAD A N.R. PAGE 4 
: 1ST MOV INSTRUCTION WITH AN "RTI" = 000002 
.PUT PC ft PS OF TRAP ON STACK 

.•RETURN TO TEST 
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SEQUENCE 111 



3657 



5658 

5659 

3660 

3661 

5662 

5663 

5664 

5665 

5666 

5667 

5668 

5669 

5670 

5671 

'^72 

5675 

56 74 

5675 

5676 

56 77 

3678 

56 79 

3680 

5681 

5682 

5685 

5684 

5685 

5686 

5687 

5688 

5689 

5690 

5691 

5692 

5693 

5694 

5695 

5696 

5697 



030662 
030664 
030672 

030700 
030706 
030712 
030720 
030722 
030724 
030732 
030734 
030740 
030742 

03074s 
030752 
030756 
030764 
030766 

030774 
031002 
031010 
051016 
031022 
031026 
031052 
051054 
031056 
051040 
051042 

031044 
031050 
031054 
031060 
031062 
031064 
031066 
051070 



000004 
012737 
012737 

012737 
012746 
012737 
006606 
006506 
012737 
012601 
022701 
001401 
104025 

012737 
012746 
012737 
006606 
012737 

012737 
012737 
012737 
012702 
012700 
004737 
006612 
000240 
000000 
104024 
005726 

012700 
012702 
004737 
006622 
000240 
177776 
104024 
005726 



077406 
000600 

030340 
007777 
031260 



01^142 
007777 



030340 
000600 
031260 



002654 
030340 
031260 
100000 
125252 
002626 



125252 
100000 
002626 



S8TTL TEST # 24 - MOVE TO PREVIOUS (USER) I-SPACE 
'test 24 HOVE TO PREVIOUS (USER) I-SPACE 



177610 
177650 

177776 

000250 

000250 



THIS TEST USES THE 'MTPI' INSTRUCTION TO ENSURE THAT THE PREVIOUS HOOE 
IS CLOCKED CORRECTLY. THERE IS A DESCRIPTION BEFORE EACH DESTINATION 
MODE TESTED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE HFPITS. 
WHICH USES THE HTPI INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST. •IMPORTANT* - ALL 'MOP'S" FOLLOWING MTPI'S OF MODES 1.2, 
4 AND 5 ARE TO BE LEFT ALONE. THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL. PREPARING FOR MODES 3, 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MTPI VI. WHERE THE ERRORS ARE REPORTED. 



T24; 



SCOPE 
MOV 
MOV 



*77406.UIPDR4 
/r600.UlPAR4 



016142 000250 



HE FOLLOWING WILL TEST DSTM=0 

MOV #030340. PSW 

MOV #7777. -(KSP) 

MOV #MTPIV2.MMVEC 

MTPI USP 

MFPI USP 

MOV #M6MERR,HMVEC 

MOV (KSP)+,R1 

CMP #7777. R1 

BEO 3S 

ERROR +25 
•FOR TIGHTER SCOPE LOOP, REPLACE 

177776 h: MOV #030340, PSW 

MOV #USESTK,-(KSP) 

MOV #MTPIV2,HHVEC 

MTPI USP 

MOV #M6MERR,MMVEC 



000250 



.•THIS WILL TEST DSTM = 1 MTPI. 

001110 MOV #MTPILP.$LPERR 

002656 MOV #030340. MTPIPM 

002744 MOV #HTPIV2.HTPIVC 

MOV #1 00000. R2 

MOV #125252, RO 

JSR PC. MTPI TS 

MTPI (R2) 
NOP 

.WORD 0 

ERROR +24 

TST (SP)* 
;THE FOLLOWING WILL TEST DSTM=2 



MOV 
MOV 

JSR 

MTPI 

NOP 

.WORD 

ERROR 

TST 



#125252, RO 
#1 00000, R2 
PC.MTPITS 
(R2)* 

-2 

♦24 

(SP)* 



.-USER I-SPACE PAGE 4 READ/WRITE 
;MAP USER I PAGE 4 TO 12K 
MTPI 

MAKE PREVIOUS MODE USER 
PUSH DATA ON KERNEL STACK 
SET M.M. VECTOR TO 20$ 
LOAD USER STACK POINTER 
READ USER STACK POINTER 
RESTORE MM VECTOR TO NORMAL ROUTINE 
POP KERNEL STACK INTO R1 
WAS USER STACK POINTER CHANGED 
BRANCH IF IT WAS 
USER STACK POINTER NOT CHANGED 
'BEO 3S" WITH *BR 2$" = 000765 
MAKE PREVIOUS MODE USER 
GET READr TO RESTORE USER S. POINT 
SET M.M. VECTOR TO 20$ 
RESTORE USER STACK POINTER 
RESTORE MM VECTOR TO NORMAL ROUTINE 

SET LOOP ON ERROR POINTER TO MTPILP IN SUBROUTINE 
SET PREVIOUS MODE = USER IN SUBROUTINE LOCATION 
SET THIS TEST'S MM TRAP HANDLER IN MTPIVC 
LOAD VIRTUAL ADDRESS INTO R2 
LOAD TEST DATA INTO RO 

GO DO TEST USING MTPI INSTRUCTION LOCATED 
<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
ADD 0 TO R? AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPI. 

LOAD TEST DATA INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING MTPI INSTRUCTION LOCATED 

<HERE - LOAD TEST DATA INTO PHYSICAL 60000 

NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

ADD -2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 

RETUR" IS HERE FOR ERROR - INCORRECT STORE 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
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5698 

5699 

5700 

5701 

5702 

5703 

5704 

5705 

5706 

5707 

5708 

5709 

5710 

5711 

571^ 

5715 

5714 

5715 

5716 

5717 

5718 

5719 

5720 

5721 

5722 

5723 

5724 

5725 

5726 

5727 

5728 

3729 

3730 

5731 

5752 

5753 

5734 

3735 

3736 

3737 

5758 

5739 

3740 

3741 

3742 

3743 

3744 

3745 

3746 

5747 

5748 

5749 

5750 

3751 

3752 

3753 



051072 
051076 
031102 
031106 
031M0 
03 12 

031114 
031120 
031124 
031130 
031152 
051154 
051136 
031140 

031142 
031146 
031152 
031160 
051164 
031166 
051170 
03117? 
031174 

031176 
031202 
031204 
031210 
031214 
031216 
031220 

031222 
031226 

031234 
031240 
031244 
031250 
031252 
031254 
031256 

031260 
031264 
031270 
031276 
031304 
031312 

031314 
031320 
031324 



012700 
004737 
006637 
000000 
104024 
005726 

012700 
012702 
004737 
006642 
000240 
000000 
104024 
005726 

012700 
012702 
012757 
004757 
006652 
000240 
076576 
104024 
005726 

012700 
005002 
004737 
006662 
100000 
104024 
005726 

012700 
012737 

012702 
004737 
006672 
076576 
104024 
005726 
000423 



052525 
002626 
100000 



125252 
100002 
002626 



052525 
001204 

100000 001202 
002626 



052525 

002626 
100000 



125252 

100000 001202 

001202 
002626 
000000 



.•THIS yiLL TEST 
«0V 
JSR 
NTPI 
.WORD 
ERROR 
TST 

.-THIS WILL TEST 

nov 

MOV 

JSR 

MTPI 

NOP 

.WORD 

ERROR 

TST 

;THE FOLLOWING 

nov 

MOV 
MOV 

JSR 

MTPI 

NOP 

.WORD 

ERROR 

TST 

.-THIS WILL TEST 
MOV 
CLR 
JSR 
MTPI 
.WORD 
ERROR 
TST 

;THE FOLLOWING 
MOV 
MOV 

MOV 

JSR 

MTPI 

.WORD 

ERROR 

TST 

BR 



012637 


001260 




HTPIV2: MOV 


012637 


001262 




MOV 


013737 


177572 


001264 


MOV 


013737 


177576 


001270 


MOV 


042737 


160000 


177572 


81 C 


104024 






ERROR 








;FOR TIGHTER 


013746 


001262 




MOV 


013746 


001260 




MOV 


000002 






RTI 



OSTM = 3 MTPI. 
#52525. RO 
PC-MTPITS 
i#1 00000 
0 

♦24 
(SP)* 

DSTM = 4 MTPI. 
#125252. RO 
#1 00002. R2 
PC .MTPI TS 
-(R2) 

0 

♦24 
(SP)* 
WILL TEST DSTM=5 
#52525.R0 
#<$TMP2*2>.R2 
#1 00000, STMP2 
PC .MTPI TS 
i-(R2) 

100000-$THP2 

♦ 24 
(SP)* 

OSTM = 6 MTPI. 
#52525. RO 
R2 

PC .MTPI TS 
1 00000 (R2} 
100000 
♦24 
(SP)* 
WILL TEST DSTM=7 
#125252. RO 
#100000. »TMP2 

#$T«P2.R2 

PC.MTPITS 
aO(R2) 

1 00000-$ TMP2 

♦24 

(SP)^ 

TST25 

«CSP) ♦.TRAPPC 

(KSP)+.TRAPPS 

SRO.WASSRO 

SR2.WASSR2 

#160000. SRO 

♦24 

OPE LOOP, REPLACI 
TRAPPS,-(KSP) 
TRAPPC.-(ICSP) 



%fQUf *iCf 112 



.-.OAD TEST DATA INTO RO 

;G0 DO TEST USING MTPI INSTRUCTION LOCATED 
;<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
.-ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
.RETURN IS HERE FOR ERROR - INCORRECT STORE 
:P0P EXCESS RETURN OFF STACK - LOOPING NOT DONE 

.•LOAD TEST DATA INTO RO 
.•LOAD VIRTUAL ADDRESS INTO R2 
;G0 DO TEST USING MTPI INSTRUCTION LOCATED 
;<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
;NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
;ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
.•RETURN IS HERE FOR ERROR - INCORRECT STORE 
.POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPI. 

.•LOAD TEST DATA INTO RO 

.-LOAD ADDR. OF LOC. $TMP2^2 INTO R2 

.•LOAD VIRT. ADDR. OF TEST LOC. INTO $TMP2 

;G0 DO TEST USING MTPI INSTRUCTION LOCATED 

;<HERE - LOAD TEST DATA INTO PHYSICAL 60000 

;NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

;ADD 100000-$TMP2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 

;RETURN IS HERE FOR ERROR - INCORRECT STORE 

;POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

.•LOAD TEST DATA INTO RO 
;MAKE REGISTER 2 ZERO 

;G0 DO TEST USING MTPI INSTRUCTION LOCATED 
;<HERE - LOAD TEST DATA INTO PHYSICAL 60000 
;ADD 100000 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
.•RETURN IS HERE FOR ERROR - INCORRECT STORE 
;POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MTPI. 

.-LOAD TEST DATA INTO RO 

;LOAD VIRT. ADDR. OF TEST LOCATION 

;INTO LOCATION $TMP2 

;LOA0 ADDRESS OF $TMP2 INTO R2 

;60 DO TEST USING MTPI INSTRUCTION LOCATED 

;<HERE LOAD TEST DATA INTO PHYSICAL 60000 

;ADD 100000-$TMP2 TO R2 AFTER MTPI INSTRUCTION EXECUTE 

.•RETURN IS HERE FOR ERROR - INCORRECT STORE 

;POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

..•BRANCH TO NEXT TEST 

;SAVE PC S PS OF TRAP 

;SAVE SRO FOR ERROR TYPEOUT 
.SAVE SR2 FOR ERROR TYPEOUT 
; CLEAR ERROR BITS IN SRO 
.•TRIED TO LOAD A N.R. PAGE 4 

1ST MOV INSTRUCTION WITH AN "RTI" = 000002 
;PUT PC t PS OF TRAP ON STACK 

.•RETURN TO TEST 



UKTBOO 11/44 HEM HGHT PRT B MACRO MlllS 12-JAN-82 12:19 
TEST « 25 - MFPI (KERNEL) TO SUPERVISOR MODE 



J 9 
PAGE 85 



SEQUENCE 113 



3768 



031326 

3769 031330 

3770 031336 

3771 031344 

3772 031350 

3773 031354 
3774 

3775 031360 

3776 031364 

3777 031372 

3778 031400 

3779 031402 

3780 031410 

3781 031414 

3782 031416 

3783 031420 

3784 031424 

3785 031426 

3786 031430 
3787 

3788 031432 

3789 031434 
3790 

3791 

3792 031436 

3793 031444 

3794 031452 

3795 031460 

3796 031464 

3797 031470 

3798 031474 

3799 031476 

3800 031500 

3801 031502 
3802 

5803 031504 

3804 031510 

3805 031514 

3806 031516 

3807 031520 

3808 031522 



000004 
012737 
012737 
012700 
010037 
012702 

105037 
012737 
012737 
006506 
012737 
022706 
001407 
012600 
012701 
020001 
001403 
104023 

000401 
104025 



012737 
012737 
012737 
012700 
012702 
004737 
006512 
000240 
104023 
005726 

012702 
004737 
006522 
000240 
104023 
005726 



S8TTL TEST « 25 - HFPI (KERNEL) TO SUPERVISOR MODE 
'test 25 MFPI (KERNEL) TO SUPERVISOR MODE 



THIS TEST CHECKS THAT IF THE PREVIOUS MODE IS KERNEL THE FETCH IS FROM 
KERNEL SPACE. THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE 
TESTED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE MFPITS, 
WHICH USES THE HFPI INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST. •IMPORTANT* - ALL 'XOP'S" FOLLOWING MFPI'S OF MODES 1,2, 
4 AND 5 ARE TO BE LEFT ALONE. THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL, PREPARING FOR MODES 3, 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MFPIV3. WHERE THE ERRORS ARE REPORTED. 



031364 001110 
040340 177776 
036514 
100000 
100000 

172210 

040340 1 7777i> 
031674 000250 

016142 000250 
000700 



001100 



TST25: 



SCOPE 
MOV 
MOV 
MOV 
MOV 
MOV 



#1S.SLPERR 
#040340, PSW 
#3651 4, RO 
RO.»ri 00000 
#1 60000. R2 



;THE FOLLOWING WILL TEST DSTM=0 MFPI 



SET LOOP ON ERROR TO IS 
GO TO SUPERVISOR MODE FOR THIS TEST 
LOAD DATA PATTERN INTO RO 
LOAD DATA PATTERN INTO PHY 60000 
LOAD VIRTUAL ADDRESS INTO R2 



CLR8 SIPDR4 

1$: MOV #040340, PSW 

MOV #MFPIV3.MMVEC 

MFPI KSP 

MOV #MGMERR.MMVEC 

CMP #SUPSTK,SSP 

BEQ 2S 

MOV (SSP)*,RO 

MOV #KERSTK,R1 

CMP R0,R1 

BEO 3S 

ERROR +23 



MAKE SUPERVISOR I-SPACE PAGE 4 NON-RESIDENT 
MAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
SET M.M. VECTOR TO MFPIV3 

PUT KERNEL STACK POINTER ON SUPERVISOR STACK 

RESTORE MM VECTOR TO NORMAL ROUTINE 

WAS SOMETHING PUSHED ON STACK AT THE MFPI 

BRANCH TO ERROR IF NOTHING WAS PUSHED 

POP SUPERVISOR STACK INTO RO 

EXPECTING 1100 AS KSP 

DID YOU GET THE RIGHT POINTER? 

BRANCH IF YOU DID 

WRONG THING WAS PUSHED ON STACK 



002516 
040340 
031674 
036514 
100000 
002464 



100000 
002464 



001110 
002520 
002622 



.-FOR TIGHTER SCOPE LOOP, REPLACE *BEO 35" WITH 'BR 1$" = 000756 

BR 3$ .-BRANCH TO NEXT TRY 

2$: ERROR +25 .-NOTHING PUSHED ON STACK 

;FOR TIGHTER SCOPE LOOP. REPLACE 'BEO 2$" ABOVE WITH 'BR 1$" = 000762 

THE FOLLOWING WILL TEST DSTM=1 MFPI. 



S$: MOV #MFPILP, SLPERR 

MOV #040340. MFPIPS 

MOV #«FPIV3,MFPIVC 

MOV #3651 4. RO 

MOV #1 00000, R2 

JSR PC -MFPITS 

MFPI (R2) 
NOP 

ERROR +23 

TST (SP)* 



.-THE FOLLOWING WILL TEST DSM=2 MFPI, 



SET LOOP ON ERROR POINTER TO MFPILP IN SUBROUTINE 
MAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
MOVE THIS TEST'S MM TRAP VECTOR TO HFPIVC 
LOAD DATA EXPECTED INTO RO 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 



MOV 

JSR 

MFPI 

NOP 

ERROR 

TST 



#1 00000. R2 
PC. MFPITS 
(R2)* 

♦23 
(SP)* 



LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 



n TBrO 1 MEW MGMT PRT B 

.T t ?S - MFPI (KERNEL) TO 



MACRO Mill 3 
SUPERVISOR MODE 



3809 

3810 

3811 

5812 

3813 

58U 

5815 

3816 

5817 

3818 

5819 

5820 

5821 

5822 

582 5 

582A 

5825 

5826 

582 7 

5828 

5829 

3830 

3831 

3852 

5855 

38 5A 

5855 

5836 

5857 

5838 

3839 

3840 

5841 

3842 

5845 

5844 

3845 



031524 
031530 
031554 
031556 

051540 
051 S44 
031550 
031552 
031554 
031556 

051560 
031566 
051572 
031576 
051600 
031602 
051604 

031606 
031610 
051614 
031620 
031622 

031624 
031652 
051656 
051642 
031646 
051650 
051652 
051660 
031666 
03U 72 



004/37 


002464 


006537 


100000 


104023 




005726 




012702 


100002 


004737 


002464 


006542 




000240 




104023 




005726 




012737 


100000 


012702 


001204 


004737 


002464 


006552 




000240 




104023 




005726 




005002 




004737 


002464 


006562 


100000 


104023 




005726 




012737 


100000 


012702 


001202 


004737 


002464 


006572 


000000 


104023 




005726 




012737 


000340 


112737 


000006 


012706 


001100 


000423 





001202 



001202 



177776 
172210 



12-JAM-82 


K 

12:19 PAGE 85- 




WILL TEST DSTM: 

WAUL IL«JI 


JSR 


PC MFPITS 


MFPI 


a#i 00000 


ERROR 


♦23 


TST 


(SP)* 


FOLLOWING 


WILL TEST DSTM- 

WA^k i^«^>ll 


MOV 


#100002 R2 


JSR 


PC MFPITS 


MFPI 


-(R2) 


NOP 




ERROR 


♦23 


TST 


(SP) ♦ 


FOI 1 OUING 


WILL TEST DSTM- 

WAL^ ILwl I/hJII* 


MOV 


#100000 ITMP2 


MOV 


#<$TMP2*2> R2 


JSR 


PC MFPITS 


MFPI 


9-(R2) 


NOP 




ERROR 


♦23 


TST 


(SP) + 


FOLLOWING 


WILL TEST DSTM 

WAkk IkWl tP«^>'> 


n R 


R2 


JSR 


PC MFPITS 


MFPI 


100000(R2) 


ERROR 


♦23 


TST 


(SP) + 


FOLLOWING 


WILL TEST DSTM 

^ALiW It^Ji l^^iil 


MOV 


#100000 $TMP2 


MOV 


#STMP2 R2 


JSR 


PC MFPITS 


MFPi 


aO(R2) 


ERROR 


♦23 


TST 


(SP) ♦ 


MOV 


#00340 PSW 


MOVfi 


#6 SIPDR4 


MOV 


#KERSTK,KSP 


BR 


TS726 



SEQUENCE 



MFPI. 

GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
.POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
=4 MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ ^ROM PHYSICAL 60000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
5 MFPI. 

LOAD TEST LOC. VIRT. ADDR INTO LOC. $TMP2 
LOAD ADDRESS OF $TMP2^2 INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 5, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

MAKE REGISTER 2 A ZERO 

GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
.POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
=7 MFPI. 

LOAD TEST LOC. VIRT. ADDR. INTO $TMP2 
LOAD ADDRESS OF $TMP2 INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
GO BACK TO KERNEL MODE, PREVIOUS KERNEL 
MAKE SIPDR4 RESIDENT 
RESET KERNEL STACK POINTER 
.•BRANCH TO NEXT TEXT 



CKKTBDO 
m TRAP 

3847 
38A8 
5849 
3850 
3851 
3852 
3853 
385A 
3855 
3856 
3857 



11/44 Klin MWT PRT B 
ROUTINE FOR *80VE TEST 



031674 
031 700 
031704 
031712 
031720 
031726 

031730 
031734 
031740 



012637 
012637 
013737 
013737 
042737 
104026 

013746 
013746 
000002 



001260 
001262 
177572 
177576 
160000 



001262 
001260 



MACRO H1 113 12-JAN-82 12; 19 PAGE 



L 

86 



SEQUENCE 115 



HFPIV3; 



001264 
001270 
177572 



:F0R 



.S8TTL 
NOV 

nov 

MOV 

nov 

BIC 
ERROR 



m TRAP ROUTINE 
(KSP)*,TRAPPC 
(KSP)*.TRAPPS 
SRO,WASSRO 
SR2.UASSR2 
«1 60000, SRO 
♦26 



FOR ABOVE TEST 
.SAVE PC t PS Of 



TRAP 



.SAVE SRO FOR ERROR TrPEOUT 
.•SAVE SR2 FOR ERROR TrPEOUT 
.•CLEAR ERROR BITS IN SRO 
.TRIED TO READ NON-RESIDENT PAGE 
TIGHTER SCOPE LOOP, REPLACE 1ST MOV INSTRUCITON WITH AN "mi" = 000002 
MOV TRAPPS.-(KSP) ;PUT PC I PS OF TRAP ON STACK 
MOV TRAPPC.-(KSP) 

RTI ;RETURN TO TEST 



CKKTBDC 11/44 nif* MG«T PRT B NACRO 111113 
TEST # 26 - MFPI (KERNEL) TO USER MODE 



12-JAN-82 12:19 



N 9 

PAGE 87 



SEQUENCE 1 1 



3858 



3859 

3860 

3861 

3862 

3863 

3864 

3865 

3866 

3867 

3868 

3869 

3870 

3871 

3872 

3873 

3874 

3875 

3876 

3877 

3878 

3879 

3880 

3881 

3882 

3883 

3884 

3885 

3886 

3887 

3888 

3889 

3890 

3891 

3892 

3893 

3894 

3895 

3896 

3897 

3898 



031742 
031744 
031752 
031760 
031764 
031770 

031774 
032002 
032006 
032014 
032016 
032024 
032030 
032032 
032034 
032040 
032042 
032044 

032046 
032050 



032052 
032060 
032066 
032074 
032100 
032104 
032110 
032112 
032114 
032116 

032120 
032124 
032130 
032132 
032134 



000004 
012737 
012737 
012700 
010037 
012702 

012737 
105037 
012737 
00o506 
012737 
022706 
001407 
012600 
012701 
020001 
001403 
104023 

000401 
104025 



012737 
012737 
012737 
012700 
012702 
004737 
006512 
000240 
104023 
005726 

012702 
004737 
006522 
000240 
104023 



S8TTL TEST # 26 - MFPI (KERNED TO USER MODE 
'test 26 MFPI (KERNEL) TO USER MODE 



031752 
140340 
036514 
100000 
100000 



001110 
177776 



THIS TEST CHECKS THAT IF THE PREVIOUS MODE IS KERNEL THE FETCH IS FROM 
KERNEL SPACE. THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE 
TESTED. THE TEST ITSELF IS CARRIED OUT IN SUBROUTINE MFPITS, 
WHICH USES THE MFPJ INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST, *IMPORTAM* - ALL '>JOP'S" FOLLOWING MFPI'S OF MODES 1.2, 
4 AND 5 ARE TO BE LcFT ALONE. THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL, PREPARING FOR MODES 3, 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MF PI V4, WHERE THE ERRORS ARE REPORTED. 

*•**••••*»»*»»•••••••»••»••••»•••»•»•»»»•••••••♦**»**»••*•**•*• 



T26: 



SCOPE 
MOV 
MOV 
MOV 
MOV 
MOV 



#1$.$LPERR 
#140340, PSW 
*36514,R0 
RO,»ri 00000 
#1 00000, R2 



032304 000250 
177610 

140340 177776 



016142 
000600 



001100 



000250 



;THE FOLLOWING WILL TEST DSTM=0 
MOV #MFPIV4,MMVEC 
CLR8 UIPDR4 
MOV #1 40340, PSW 
MFPI KSP 
MOV #M6MERR,MMVEC 
CMP #USESTK,USP 
BEO 2$ 
MOV (USP)+,RO 
MOV #KERSTK,R1 
CMP RO.Rl 
BEQ 3S 
ERROR +23 

;FOR TIGHTER SCOPE LOOP. REPLACE 
BR 3S 

2S: ERROR •^25 

;FOR TIGHTER SCOPE LOOP, REPLACE 



SET LOOP ON ERROR TO 1$ 
GO TO USER MODE FOR THIS TEST 
LOAD DATA PATTERN INTO RO 
LOAD DATA PATTERN INTO PHY 60000 
LOAD VIRTUAL ADDRESS INTO R2 
MFPI 

SET M.M. VECTOR TO MFPIV4 
MAKE USER I-SPACE PAGE 4 NON-RESIDENT 
MAKE PREVIOUS MODE KERNEL PRESENT USER 
PUT KERNEL STACK POINTER ON USER STACK 
RESTORE MM VECTOR TO NORMAL ROUTINE 
WAS SOMETHING PUSHED ON STACK AT THE MFPI 
BRANCH IF NOTHING WAS PUSHED 
POP USER STACK INTO RO 
EXPECTING 1100 AS KSP 
DID YOU GET THE RIGHT POINTER? 
BRANCH IF YOU DID 
WRONG THING WAS PUSHED ON STACK 
•BEO 3$" WITH *8R 1$" = 000763 
.•BRANCH TO NEXT TRY 
;N0THING PUSHED ON STACK 
'BEO 2%" WITH 'BR 1$" = 000763 



002516 
140340 
032304 
036514 
100000 
002464 



100000 
002464 



001110 
002520 
002622 



;THE FOLLOWING 
3$: MOV 
MOV 
MOV 
MOV 
MOV 
JSR 
MFPI 
NOP 
ERROR 
TST 

.-THE FOLLOWING 
.MOV 

JSR 
MFPI 
NOP 
ERROR 



WILL TEST DSTM=1 
#MFPILP.JLPERR 
*140340,MFPIPS 
#MFPIV4,MFPIVC 
*36514.R0 
*1 00000, R2 
PC .MFPI TS 
(R^> 

♦23 
(SP)* 
WILL TEST DSM=2 
*100000,R2 
PC.MFPITS 

♦23 



MFPI. 

SET LOOP ON ERROR POINTER TO MFPILP IN SUBROUTINE 
MAKE PREVIOUS MODE KERNEL PRESENT USER 
MOVE THIS TEST'S MM TRAP ^'ANDLER TO MFPIVC 
LOAD DATA EXPECTED INTO RO 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 



CKKTBOO 11/44 MEM HGMT PRT B MACRO Ml 113 
TEST M 2b - MFPI (KERNEL) TO USER MODE 



3899 

3900 

3901 

3902 

3903 

3904 

3905 

3906 

3907 

3908 

3909 

3910 

3911 

3912 

3913 

3914 

3915 

3916 

3917 

3918 

3919 

3920 

3921 

3922 

3923 

3924 

3925 

3926 

3927 

3928 

3929 

3930 

3931 

3932 

3933 

3934 

3935 



03^136 005726 



032U0 
032144 
032150 
032152 

032154 
032160 
032164 
032166 
032170 
032172 

032174 
032202 
032206 
032212 
032214 
032216 
032220 

032222 
032224 
032230 
032234 
032236 

032240 
032246 
032252 
032256 
032262 
032264 
032266 
032274 
032302 



004737 
006537 
104023 
005726 

012702 
004737 
006542 
000240 
104023 
005726 

012737 
012702 
004737 
006552 
000240 
104023 
005726 

005002 
004737 
006562 
104023 
005726 

012737 
012702 
004737 
006572 
104023 
005726 
012737 
112737 
000423 



002464 
100000 



100002 
002464 



100000 
001204 
002464 



001202 



002464 
100000 



100000 001202 
001202 
002464 
000000 



000340 177776 
000006 177610 





N 
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TST 


(SP) + 


FOLLOWING 


WILL TEST DSTM- 

WAkk 'k^' tra/ll* 


JSR 


PC.MFPITS 


MFPI 


M1 00000 


ERROR 


♦23 


TST 


(SP)* 


FOLLOWING 


WILL TEST DSTM- 


MOV 


f 100002 R2 


JSR 


PC .MFPI TS 


MFPI 


-(R2) 


NOP 




ERROR 


♦23 


TST 


(SP) + 


FOLLOWING 


WILL TEST DSTM 

W^kk tkv> lr^>'l 


MOV 


*100000.$TMP2 


MOV 


#<$TMP2*2>-R2 


JSR 


PC. MFPI TS 


MFPI 


a-(R2) 


NOP 




ERROR 


♦23 


TST 


(SP)* 


FOLLOWING 


WILL TEST DSTM 


CLR 


R2 


JSR 


PC MFPITS 

I k««l*' 


MFPI 


1 00000 (R2) 


ERROR 


♦23 


TST 


<SP)* 


FOLLOWING 


WILL TEST DSTM 

W^kk ikv' 


MOV 


*1 00000. $TMP2 


MOV 


#STMP2.R2 


JSR 


PC MFPITS 


MFPI 


aO(R2) 


ERROR 


♦23 


TST 


(SP)* 


MOV 


*00340.PSW 


M0V6 


«6.UIP0R4 


BR 


TST27 



-3 



=4 



=5 



=6 



=7 



SEQUENCE 1 



POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 
60 DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD TEST LOC. VIRT. ADDR INTO LOC. $T«P2 
LOAD ADDRESS OF $TMP2^2 INTO R2 
GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

MAKE REGISTER 2 A ZERO 

GO DO TEST USING MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 60000 
WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD TEST LOC. VIRT. ADDR. INTO $TMP2 

LOAD ADDRESS OF $TMP2 INTO R2 

GO DO TEST USING MFPI INSTRUCTION LOCATED 

<HERE - READ FROM PHYSICAL 60000 

WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
GO BACK TO KERNEL MODE. PREVIOUS KERNEL 
MAKE UIPDR4 RESIDENT 
.•BRANCH TO NEXT TEXT 



TRAP HANDLER FOR A80VE TEST 
3957 

395a 032304 01263^ 001260 

3939 032310 012637 001262 

3940 032314 013757 177572 

5941 052322 015757 177576 

5942 052530 042757 160000 
5945 052536 104026 

5944 

5945 052340 015746 001262 

3946 032344 013746 0012^0 

39h7 032350 000002 



e 10 

^'ACRC «ir3 12-JAN-82 V:19 PAGE 88 



•SSTTl m TRAP HANOlEP for ABOVE TEST 

HFPJV4: HOV (KSP; ♦ . TRAPPC ;SAvE PC t PS Of TRAP 

NOV (KSP;».TRAPPS 

001264 HOV SRO.yASSRO .SAVE SRO FOR ERROR TVPEOUT 

001270 HOV SR2.yASSR2 .SAVE SR2 FOR ERROR TVPEOUT 

V7572 BIC #160000, SRO .CLEAR ERROR BITS IN SRO 

ERROR ^26 .-TRIED TO READ NON-RESIDENT PAGE 
;FOR TIGHTER SCOPE LOOP. REPLACE 1ST ROV INSTRUCTION yiTH AN "RTI" 

PWV TRAPPS,-(KSP) .-PUT PC t PS OF TRAP ON STACK 

HOV TRAPPC. -(KSP) 

RTI .-RETURN TO TEST 



CKKTBDO 11/44 MEM NGHT PRT B 
TEST # 27 - MfPI (SUPERVISOR) 

3962 



MACRO Mil 13 12-JAN-82 12:19 PAGE 
WITH SUPER D-SPACE ENABLED 



C 10 
89 



SEQUENCE M9 



032352 
3963 032354 
3964 

3965 032360 

3966 032364 

3967 032370 

3968 032374 

3969 032400 

3970 032404 

3971 032410 

3972 032416 
3973 

3974 032422 

3975 032430 

3976 032436 

3977 032444 

3978 032450 

3979 032454 

3980 032456 

3981 032460 

3982 032462 
3983 

3984 032464 

3985 032470 

3986 032474 

3987 032476 

3988 032500 

3989 032502 
3990 

3991 032504 

3992 032510 

3993 032514 

3994 032520 

3995 032522 
3996 

3997 032524 

3998 032530 

3999 032534 

4000 032536 

4001 032540 

4002 032542 



000004 
012700 

010037 
010037 
010037 
010037 
012700 
010037 
052737 
105037 

012737 
012737 
012737 
012702 
004737 
006512 
000240 
104037 
005726 

012702 
004737 
006522 
000240 
104037 
005726 

012702 
004737 
006537 
104037 
005726 

012702 
004737 
006542 
000240 
104037 
005726 



077400 

172330 
172230 
177630 
177610 
036514 
060000 
000002 
172310 

002516 
010340 
032562 
100000 
002464 



100000 
002464 



100000 
002464 
100000 



100002 
002464 



SBTTL TEST M 27 - HFPI (SUPERVISOR) WITH SUPER D-SPACE ENABLED 
'test 27 Mf PI (SUPERVISOR) WITH SUPER D-SPACE ENABLED 



THIS TEST USES THE 'MFPI* INSTRUCTION TO ENSURE THAT PREVIOUS MODE IS 
CLOCKED CORRRECTLY, AND THAT D-SPACE IS NOT ENABLED. THE TES' ITSElF 
IS CARRIED OUT IN SUBROUTINE HFPITS. WHICH USES THE HFPI INSTRUCTION 
CODE FOLLOWING THE JSR CALL TO EXECUTE THE TEST. tlMPORTANT* - ALL 
"HOP'%" FOLLOWING MFPI'S OF MODES 1,2, 4 AND 5 ARE TO BE LEFT ALONE. 
THE SUBROUTINE LOADS THE TWO WORDS AFTER THE JSR CALL. PREPARING FOR 
MODES 3, 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED. A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO MFPIV5, WHERE THE ERRORS ARE REPORTED. 



172516 



001110 
002520 
002622 



TST27: SCOPE 
MOV 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
BIS 
CLRB 
.-THE FOLLOWING 
MOV 
MOV 
MOV 
MOV 
JSR 
MFPI 
NOP 
ERROR 
TST 

;THE FOLLOWING 
MOV 
JSR 
MFPI 
NOP 
ERROR 
TST 

;THE FOLLOWING 
MOV 
JSR 
MFPI 
ERROR 
TST 

;THE FOLLOWING 
MOV 

JSR 

MFPI 

NOP 

ERROR 

TST 



A************************************************** 



#77400. RO 

R0.KDPDR4 
R0.SDPDR4 
R0,UDPDR4 
R0,UIPDR4 
#36514. RO 
R0.a#60000 
#BIT1 .MMR3 
KIPDR4 
WILL TEST DSTM=1 
#MFPILP.$LPERR 
#010340.MFPIPS 
#MFPIV5.MFPIVC 
#1 00000. R2 
PC -MFPI TS 
(R2) 

♦37 
(SP)* 
WILL TEST DSTM=2 
#1 00000, R2 
PC .MFPI TS 
(R2)* 

♦37 

(SP)* 
WILL TEST DSTM=3 

#1 00000. R2 

PC.MFPITS 

a#1 00000 

♦37 

(SP)^ 
WILL TEST DSTM=4 

#1 00002. R2 

PCMfPITS 

-(R2) 

♦37 
(SP)^ 



MAKE PAGE 4 IN ALL BUT SUPERVISOR I 
AND KERNAL I NON-RESIDENT 
KERNAL D-SPACE PAGE 4 
SUPERVISOR D-SPACE PAGE 4 
USER D-SPACE PAGE 4 
USER I -SPACE PAGE 4 
LOAD DATA PATTERN INTO RO 
LOAD DATA PATTERN INTO PHYS. 60000 
ENABLE SUPERVISOR D-SPACE 
MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 
MFPI. 

SET LOOP ON ERROR POINTER TO MFPILP IN SUBROUTINE 
MAKE PREVIOUS MODE SUPERVISOR IN SU6RTN LOCATION 
MOVE THIS TEST'S MM TRAP HANDLER TO MFPIVC 
LOAD VIRTUAL ADDRESS INTO R2 
60 DO TEST USING THE MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 60000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI. 

LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING THE MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 100000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI, 

LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING THE MFPI INSTRUCTION FOUND 
<HERE - READ FROM PHYSICAL 100000 
RETURN IS HERE FOR ERROR - WRONG DATA FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
HFPI. 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING THE HFPI INSTRUCTION FOUND 

<HERE - READ FROM PHYSICAL 100000 

NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 



CUKTBDO n/<.^ MEM MGMT PRT B MACRO M1115 12-JAN-82 ^2:^^ 
TEST # ?7 - MfPI fSUPERVlSOR) WITH SUPER D-SPACE ENABLED 



D 10 
PAGE 89-1 



4005 Old'iU 112737 000006 172310 

4004 032552 042737 000002 172516 

4005 032560 000426 



MOVB 

BK 

BR 



#6.K1PDR4 
#BJT1.MMR3 

TST30 



SEQUENCE 



;MAICE KIPDR4 RESIDENT 
.•DISABLE SUPERVISOR D-SPACE 
; .-BRANCH TO NEXT TEST 



CKKTBDO 
m TRAP 

^.007 
4008 
^.009 
<.010 
4011 
4012 
4013 
4014 
4015 
4016 
4017 
4018 



11/44 «E« «GHT PRT B 
HANDLER FOR ABOVE TEST 



032562 
032570 
032576 
032604 
032612 
032616 
032622 

032624 
032630 
032634 



013737 
013737 
013737 
013737 
012637 
012637 
104040 

013746 
013746 
000002 



177572 
177574 
177576 
172516 
001260 
001262 



001262 
001260 



MACRO Nil 13 12-JAN-82 12:19 PAGE 



E 10 
90 



SEQUENCE 121 



001264 
001266 
001270 
001272 



HFPiVS: 



.S8TTL 
MOV 

nov 

HOV 

MOV 
MOV 
MOV 
ERROR 



MM TRAP HANDLER FOR ABOVE TEST 



MMRO.WASSRO 
MMRKUASSR1 
fV1R2,WASSR2 
WR3,WASSR3 
(KSP)*,TRAPPC 
(KSP)*,TRAPPS 
♦40 



.•SAVE MMRO FOR ERROR TrPEOUT 

.•SAVE MMfil FOR ERROR TVPEOUT 

.SAVE MMR2 FOR ERROR TrPEOUT 

.SAVE MMR3 FOR ERROR TVPEOUT 

.SAVE PC t PS OF TRAP 



.•TRIED TO READ NON-RESIDENT PAGE 
;FOR TIGHTER SCOPE LOOP, REPLACE 1ST MOV INSTRUCTION WITH AN "RTI" = 000002 
MOV TRAPPS,-(KSP) ;PJT PC i PS OF TRAP ON STACK 
MOV TRAPPC.-(KSP) 
RTI 



F 10 

CKKTBDO n/AA HEH HGHT PRT B MACRO Hi 113 12-JAN-82 12:19 PAGE 91 
TEST # 30 - mPl (SUPERVISOR) yiTH SUPER. D-SPACE ENABLED 



SEQUENCE 122 



A033 



032636 
403A 0326A0 
A035 

A036 0326A6 
A037 03265A 
A038 032662 
A039 032670 
AOAO 03267A 
A0A1 032700 
A0A2 03270A 
A0A3 032706 
40AA 032710 
A0A5 032712 
A0A6 03271 A 
ADA 7 

A0A8 032716 
A0A9 032722 
A050 032726 
A051 032732 
A052 03273A 
A053 032736 
A05A 

4055 0327A0 
A056 0327AA 
A057 032750 
A058 03275A 
A059 032756 
A060 032760 
A061 032762 
A062 03276A 
A063 

A06A 032766 
A065 032772 
A066 032 77A 
A067 033000 
A068 03300A 
A069 033006 
A070 033010 
A071 033012 
A072 033020 



OOOOOA 
052737 

012737 
012737 
012737 
012702 
012700 
00A737 
006612 
0002AO 
000000 
10A035 
005726 

012700 
00A737 
006637 
000000 
10A035 
005726 

012700 
012702 
00A737 
0066A2 
0002AO 
000000 
10A035 
005726 

012700 
005002 
00A737 
006662 
100000 
10A035 
005726 
0A2737 
000A10 



00265A 
0103A0 
033022 
100000 
125252 
002626 



052525 
002626 
100000 



125252 
100002 
002626 



S8TTL TEST # 30 - HTPI (SUPERVISOR) WITH SUPER. D-SPACE ENABLED 

'test 30 MTPI (SUPERVISOR) UlTH SUPER. D-SPACE ENABLED 

THIS TEST USES THE 'HTPI' INSTRUCTION TO ENSURE THAT THE PREVIOUS MODE 
IS CLOCKED CORRECTLY, AND THAT D-SPACE IS NOT ENABLED. THE TEST ITSELf 
IS CARRIED OUT IN SUBROUTINE MTPITS. WHICH USES THE MTPI INSTRUCTION 
CODE FOLLOWING THE JSR CALL TO EXECUTE THE TEST. •IMPORTANT* - ALL 
'>JOP'S" FOLLOWING MTPI'S OF MODES 1.2. A AND 5 ARE TO BE LEFT ALONE. 
THE SUBROUTINE LOADS THE TWO WORDS AFTER THE JSR CALL, PREPARING FOR 
MODES 3. 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED. A NON-RESIDENT ABORT WILL OCCUR AND 
AND TRAP TO MTPIV3, WHERE THE ERRORS ARE REPORTED. 



000002 172516 



001110 
002656 
0027AA 



052525 

002626 
100000 



000002 172516 



TST30; SCOPE 
BIS 

.•THIS WILL TEST 
MOV 
MOV 
MOV 
MOV 
MOV 
JSR 
MTPI 
NOP 
.WORD 
ERROR 
TST 

.•THIS WILL TEST 
MOV 
JSR 
MTPI 
.WORD 
ERROR 
TST 

.-THIS WILL TEST 
MOV 
MOV 
JSR 
MTPI 
NOP 
.WORD 
ERROR 
TST 

.•THIS WILL TEST 
MOV 

CLR 

JSR 

MTPI 

.WORD 

ERROR 

TST 

BIC 

BR 



#BIT1,MMR3 
DSTM = 1 MTPI 
#MTPILP.$LPERR 
#0103A0.MTPIPM 
#MTPIV3.MTPIVC 
#1 00000. R2 
#1 25252.ro 
PC. MTPI TS 
(R2) 

0 

♦35 
(SP)* 

DSTM = 3 MTPI 
#52525, RO 
PC .MTPI TS 
ATI 00000 
0 

♦35 
(SP) + 

DSTM = A MTPI 
#125252. RO 
#1 00002, R2 
PC.MTPITS 
-(R2) 

0 

♦35 
(SP)* 

DSTM = 6 MTPI 
#52525. RO 
R2 

PC.MTPITS 
1 00000 (R2) 
100000 
+35 
(SP)* 

#8IT1.MMR3 
TST31 



.ENABLE SUPERVISOR D-SPACE 

SET LOOP ON ERROR POINTER TO MTPILP IN SUBROUTINE 
MAKE PREVIOUS MODE SUPERVISOR IN LOCATION IN SUBR^N 
LOAD THIS TEST'S MM TRAP HANDLER TO MTPIVC 
LOAD VIRTUAL ADDRESS INTO R2 
LOAD TEST DATA INTO RO 

GO DO THE TEST USING MTPI INSTRUCTION FOUND 
LOAD TEST DATA INTO PHYSICAL 100000 

<HERE - NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 

GO DO THE TEST USING MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 100000 
ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO THE TEST USING MTPI INSTRUCTION FOUND 

<HERE - LOAD TEST DATA INTO PHYSICAL 100000 

NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 

RETURN IS HERE FOR ERROR - INCORRECT STORE 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 
MAKE R2 ZERO 

GO DO THE TEST USING MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 100000 
ADD 100000 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
DISABLE SUPERVISOR D-SPACE 
.•BRANCH TO NEXT TEST 



CKKTBDO «EM «Gf1T PRT 8 

m TRAP HANDLER FOR ABOVE TEST 



4075 033022 

4076 033026 

4077 033032 

4078 033036 
4079 

4080 033040 



013700 
013701 
013702 
104036 

000002 



177S72 
177574 
177576 



HACRO H1113 12-JAN-82 12:19 PAGE 



G 10 
92 



seOUEMCE 



.SBTTL m TRAP HANDLER FOR ABOVE TEST 

HTPIV3: MOV MWO.RO ;SAVE HHRO FOR ERROR TVPEOUT 

MOV HMfil.RI .-SAVE NW1 FOR ERROR TrPEOUT 

MOV WW2.R2 ;SAVE MW2 FOR ERROR TrPEOUT 

ERROR ^36 ; TRIED TO LOAD A NON-RESIDENT PAGE 4 

;FOR TIGHTER SCOPE LOOP, REPLACE 1ST MOV INSTRUCTION WITH AN "RTI" = 
RTI .-RETURN TO TEST 



000002 



CKKTBDO 11 /A4 MEM MG«T PRT B MACRO H1 113 12-JAN-82 12:19 
TEST # 31 - MTPI (USER) WITH USER D-SPACE ENABLED 



PAGE 



H 10 
93 



SEQUENCE 124 



4081 



4082 
4083 
4084 
4085 
4086 
4087 
4088 
4089 
4090 
4091 
4092 
4093 
4094 
4095 
4096 
4097 
4098 
4099 
4100 
4101 
4102 
4103 
4104 
4105 
4106 
4107 
4108 
4109 
4110 
4111 
4112 
^113 
4114 
4115 
4116 
A117 
4118 
4119 
4120 
4121 



033042 
033044 
033052 
033060 

033066 
033074 
033102 
033110 
033114 
033120 
033124 
033126 
033130 
033132 
033134 

033136 
033142 
033146 
033152 
033154 
033156 

033160 
033164 
033170 
033174 
033176 
033200 
033202 
033204 

033206 
033212 
033214 
033220 
033224 
033226 
033230 
033232 



000004 
012737 
012737 
052737 

012737 
012737 
012737 
012702 
012700 
004737 
006612 
000240 
000000 
104035 
005726 

012700 
004737 
006637 
000000 
104035 
005726 

012700 
012702 
004737 
006642 
000240 
000000 
104035 
005726 

012700 
005002 
004737 
006662 
100000 
104035 
005726 
042737 



077400 
077406 
000001 

002654 
030340 
033242 
100000 
125252 
002626 



052525 
002626 
100000 



125252 
100002 
002626 



S8TTL TEST # 31 - MTPI (USER) WITH USER D-SPACE ENABLED 
'test 31 MTPI (USER) WITH USER D-SPACE ENABLED 



THIS TEST USES THE 'MTPI' INSTRUCTION TO ENSURE THAT THE PREVIOUS MODE 
IS CLOCKED CORRECTLY. AND THAT D-SPACE IS NOT ENABLED. THE TEST ITSELF 
IS CARRIED OUT IN SUBROUTINE MTPITS, WHICH USES THE MTPI INSTRUCTION 
CODE FOLLOWING THE JSR CALL TO EXECUTE THE TEST. *IMPORTANT* - ALL 
••HOP'S" FOLLOWING MTPI'S OF MODES 1,2. 4 AND 5 ARE TO BE LEFT ALONE. 
THE SUBROUTINE LOADS THE TWO WORDS AFTER THE JSR CALL. PREPARING FOR 
MODES 3, 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED. A NON-RESIDENT ABORT WILL OCCUR AND 
AND TRAP TO MTPIV4. WHERE THE ERRORS ARE REPORTED. 



172210 
177610 
172516 

001110 
002656 
002744 



052525 

002626 
100000 



000001 172516 



TST31 : SCOPE 
MOV 
MOV 
BIS 

.-THIS WILL TEST 
MOV 
MOV 
MOV 
MOV 
MOV 
JSR 
MTPI 
NOP 
.WORD 
ERROR 
TST 

.-THIS WILL TEST 
MOV 
JSR 
MTPI 
.WORD 
ERROR 
TST 

.-THIS WILL TEST 
MOV 
MOV 
JSR 
MTPI 
NOP 
.WORD 
ERROR 
TST 

;THIS WILL TEST 
MOV 
CLR 
JSR 
MTPI 
.WORD 
ERROR 
TST 
BIC 



#77400, SIPDR4 
#77406. UIPDR4 
#Bir0,MMR3 
DSTH = 1 MTPI 
#HTPILP,»LPERR 
#030340 .MTPIPM 
#MTPIV4,HTPIVC 
#1 00000. R2 
#125252, RO 
PC .MTPITS 
(R2) 

0 

♦35 
(SP) + 

DSTM = 3 MTPI 
#52525, RO 
PCMTPITS 
a#1 00000 
0 

+35 
(SP)* 

DSTM = 4 MTPI 
#125252. RO 
#1 00002, R2 
PC, MTPITS 
-(R2) 

0 

+35 
(SP) + 

DSTM = 6 MTPI 
#52525, RO 

R2 

PCeMTPITS 
1 00000 (R2) 
100000 
+35 
(SP)* 

#8IT0.MHR3 



MAKE SIPDR4 NON-RESIDENT 
MAKE UIPDR4 RESIDENT 
ENABLE USER D-SPACE 

SET LOOP ON ERROR POINTER TO MTPILP IN SUBROUTINE 

MAKE LOCATION IN SUBROUTINE PREVIOUS MODE USER 

PUT THIS TEST'S MM TRAP HANDLER ADDRESS IN LOC MTPIVC 

LOAD VIRTUAL ADDRESS INTO R2 

LOAD TEST DATA INTO RO 

60 DO TEST USING MTPI INSTRUCTION FOUND 

<HERE - LOAD TEST DATA INTO PHYSICAL 100000 

MODE NOT 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 

RETURN IS HERE FOR ERROR - INCORRECT STORE 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 
60 DO TEST USIN6 MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 100000 
ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 

LOAD VIRTUAL ADDRESS INTO R2 

60 DO TEST USIN6 MTPI INSTRUCTION FOUND 

LOAD TEST DATA INTO PHYSICAL 100000 

<HERE - MODE NOT 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
ADD 0 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

LOAD TEST DATA INTO RO 
MAKE R2 ZERO 

60 DO TEST USIN6 MTPI INSTRUCTION FOUND 
<HERE - LOAD TEST DATA INTO PHYSICAL 100000 
ADD 100000 TO R2 AFTER MTPI INSTRUCTION EXECUTE 
RETURN IS HERE FOR ERROR - INCORRECT STORE 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
DISABLE USER D-SPACE 



I 10 

CKKT800 IVU t^n HGHT PRT B PMCRO 12-JAN-82 12;19 PAGE 93-1 SEQUENCE 

TEST » 31 - MTPl (USER) WITH USER 0-SPACE ENABLED 

4122 033240 000410 BR TST32 ; .-BRANCH TO NEXT TEST 



hkTBDO 
MM TRAP 

4125 
4126 
4127 
4128 
4129 
4130 



n/44 MEM MGMT PRT B MACRO 
CATTHER FOR ^hE A80VE TEST 



Hm3 12-JAN-82 12:19 PAGE 



J 10 
94 



SEQUENCE 126 



033242 
033246 
033252 
033256 



013700 
013701 
013702 
104036 



033260 000002 



177572 
177574 
177576 



.SBTTL m TRAP CATCHER FOR THE ABOVE TEST 



HTPIV4: MOV HWO.RO 
MOV MMR1.R1 
MOV MMR2.R2 
ERROR *36 
;FOR TIGHTER SCOPE LOOP. 
RTJ 



SAVE HMRO FOR ERROR TyPEOOT 
SAVE MWI FOR ERROR TVPEOUT 
SAVE mR2 FOR ERROR TVPEOUT 
.TRIED TO LOAD A NON-RESIDENT PAGE 4 
REPLACE 1ST MOV INSTRUCTION WITH AN "RTI" = 000002 
.•RETURN TO TEST 



CKKTBDO MEM MGHT PRT B MACRO H1 113 

TEST # 32 - MFPI (PREVIOUS=CURRENT=KERNEL) 



12-JAN-82 12:19 



K 10 
PAGE 95 



SEQUENCE 



4159 



4U1 
AU2 
4K3 

AU5 
4U6 
AU7 
4U8 
4U9 
A150 
A151 
A152 
4153 
4154 
4155 



033262 
033264 
033272 
033276 
033302 
033304 
033306 
033310 
033312 
033314 

033316 
033320 
033322 
033324 



000004 
112737 
005037 
012700 
010006 
006506 
01 '^1 
020c I 
0014 I 
104037 

005740 
020600 
001401 
104025 



000006 
177776 
001100 



172330 



.S8TTL TEST * 32 - MFPI (PREV]OUS=CURRENT=KERNEu ) 



TEST 32 



MFPI (PR£VIOUS=CURRENIT=KERNEL) 



THIS TEST CHECKS THAT IF BOTH PREVIOUS AND CURRENT MODES ARE KERNEL. 
AND THE SOURCE MODE IS 0. THE DESTINATION STACK IS NOT DECREMENTED 
BEFORE ACCESS. "HFPI KSP SHOULD PUSH THE NON-DECREMENTED VALUE OF KSP 
(1100) ONTO THE STACK (AT LOC. 1076). 



TST32: 
1$: 



SCOPE 

novB 

CLR 

MOV 

MOV 

MFPI 

MOV 

CMP 

BEQ 

ERROR 



*6.KDPDR4 

*STACK,RO 

RO,KSP 

KSP 

(KSP). Rl 
R0.R1 
2$ 
+37 



033326 012706 001100 



.FOR TIGHTER SCOPE LOOP. REPLACE 
2$: TST -(RO) 

CMP KSP.RO 

BEQ 3S 

ERROR +25 
:FOR TIGHTER SCOPE LOOP, REPLACE 
3$: MOV *S TACK. KSP 



MAKE KDPDR4 RESIDENT 
SET PREVIOUS = CURRENT = KERNEL 
SETUP VALUE FOR STACK POINTER 
LOAD STACK POINTER 

THE VALUE "STACK" SHOULD BE PUSHED BEFORE BEING DEC'D 
READ DATA WHICH WAS PUSHED 

WAS THE ORIGINAL VALUE OF THE STACK POINTER PUSHED? 

BRANCH IF YES 

MFPI FETCHED WRONG DATA 

'BEO 2$" WITH 'BR 1$" = 000767 

SETUP EXPECTED STACK POINTER VALUE 

WAS THE STACK POINTER DECREMENTED? 

BRANCH IF YES 

STACK NOT PUSHED BY THE MFPI 
•BEO 3$" WITH 'BR 1$" = 000760 
RESTORE STACK POINTER 



CKKT800 11/44 MEM NGMT PRT B MACRO H1113 12-JAN-8^ 12:19 
TEST f 33 - HFPD (SUPERVISOR) WITH SUPER D-SPACE ENABLED 



L 10 
PAGE 96 



SEQUENCE 128 



4169 



033332 000004 



.S8TTL TEST # 33 - MFPD (SUPERVISOR) WITH SUPER D-SPACE ENABLED 
*************************************************************** 

TEST 33 MFPD (SUPERVISOR) WITH SUPER D-SPACE ENABLED 

THIS TEST CHECKS TO SEE THAT THE REFERENCE IS TO D-SPACE IF THE INSRUC- 
TION IS AN HFPD. THE TEST ITSELF IS CARRIED GUT IN SUBROUTINE HFPDTS. 
WHICH USES THE HFPD INSTRUCTION CODE FOLLOWING THE JSR CALL TO EXECUTE 
THE TEST. -IHRORTANT* - ALL '>JOP'S" FOLLOWING HFPD'S OF MODES 1,2. 
4 AND 5 ARE TO BE LEFT ALONE- THE SUBROUTINE LOADS THE TWO WORDS 
AFTER THE JSR CALL. PREPARING FOR MODES 3. 6 AND 7. 

IF THE CORRECT MODE IS NOT ENABLED. A NON-RESIDENT ABORT WILL OCCUR 
AND TRAP TO HFPDVl . WHERE THE ERRORS ARE REPORTED. 

TST33: SCOPE 



4170 033334 


012737 


000600 


172270 




MOV 


4171 033342 


012700 


077400 




20S: 


MOV 


4172 












4173 033346 


010037 


172330 






MOV 


4174 033352 


010037 


172210 






MOV 


4175 033356 


010037 


177630 






MOV 


4176 033362 


010037 


177610 






MOV 


4177 033366 


012737 


077406 


172230 




MOV 


4178 033374 


012700 


036514 






MOV 


4179 033400 


010037 


100000 






MOV 


4180 033404 


052737 


000002 


172516 




BIS 


4181 033412 


105037 


172310 






CLR8 


4182 








.-THE 


FOLLOWING 


4183 033416 


012737 


002770 


001110 




MOV 


4184 033424 


012737 


010340 


002772 




MOV 


4185 033432 


012737 


033564 


003040 




MOV 


4186 033440 


012702 


100000 






MOV 


4187 033444 


004737 


002746 






JSR 


4188 033450 


106512 








MFPD 


4189 033452 


000240 








NOP 


4190 033454 


104037 








ERROR 


4191 033456 


005726 








TST 


4192 








;THE 


FOLLOWING 


4193 033460 


012702 


100000 






MOV 


4194 033464 


004737 


002746 






JSR 


4195 033470 


106522 








MFPD 


4196 033472 


000240 








NOP 


4197 033474 


104037 








ERROR 


4198 033476 


005726 








TST . 


4199 








;THE 


FOLLOWING 


4200 033500 


012702 


100000 






MOV 


4201 033504 


004737 


002746 






JSR 


4202 033510 


106537 


100000 






MFPD 


4203 033514 


104037 








ERROR 


4204 033516 


005726 








TST 


4205 








.-THE 


FOLLOWING 


4206 033520 


012702 


100002 




MOV 


4207 033524 


004737 


002746 






JSR 


4208 033530 


106542 








MFPD 


4209 033532 


000240 








NOP 


4210 033534 


104037 








ERROR 



*600.SDPAR4 
*77400,R0 

R0.KDPDR4 
R0.SIPDR4 
R0.UDPDR4 
R0,UIPDR4 
#77406, SDPDR4 
#36514.R0 
R0,a#1 00000 
/lfeiT1,MHR3 
KIPDR4 
WILL TEST DSTM=1 
*MFPDLP,$LPERR 
#010340.MFPDPS 
#MfPOVl,HFPDVC 
#100000,R2 
PC.MfPDTS 

♦37 
(SP)* 
WILL TEST DSTM=2 
#1 00000. R2 
PC.MFPDTS 

+37 

(SP) + 
WILL TEST DSTM=3 

#1 00000, R2 

PCMFPDTS 

a#1 00000 

+37 

(SP) + 
WILL TEST DSTH=4 

#1 00002. R2 

PCMFPDTS 

-(R2) 

+37 



MAP SDPAR4 TO 12K 
MAKE PAGE 4 IN ALL BUT SUPERVISOR D 
AND KERNAL I NON-RESIDENT 
KERNAL D-SPACE PAGE 4 
SUPERVISOR I -SPACE PAGE 4 
USER D-SPACE PAGE 4 
USER I-SPACE PAGE 4 
MAKE SDPDR4 RESIDENT 
LOAD DATA PATTERN INTO RO 
LOAD DATA PATTERN INTO PHYS. 100000 
ENABLE SUPERVISOR D-SPACE 
MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 
HFPD 

SET LOOP ON ERROR POINTER TO HFPDLP IN SUBROUTINE 
MOVE PREVIOUS MODE=SUPERVISOR TO LOCATION IN SUBRTN 
PUT ADDRESS OF THIS TEST'S HM TRAP CATCHER IN MFPDVC 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING THE HFPD INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 100000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
HFPD 

LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING THE HFPD INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 100000 
NOT MODE 3, 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
HFPD 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING THE HFPD INSTRUCTION LOCATED 

<HERE - READ FROM PHYSICAL 100000 

WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
HFPD 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING THE HFPD INSTRUCTION LOCATED 

<HERE - READ FROH PHYSICAL 100000 

NOT HODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 



LK.KTBDO n/4; MEM MGMT PRT B MACRO Mil 13 12--AN-82 12:19 
TES^ » 33 - MFPO (SUPERVISOR) WITH SUPER D-SPACE ENABLED 



PAGE 



4211 
4212 
4213 
4214 
4215 
4216 



035S5(. 
033540 
033546 
033552 
033556 
033562 



005726 
042737 
012700 
010037 
010037 
000423 



000002 
077406 
172310 
1 77630 



172516 



TST 
BIC 
MOV 
MOV 
MOV 
BR 



(SP)* 

#81 T1 .MMR3 
#77406. RO 
R0.ICIPDR4 
R0.UDPDR4 
TST34 



SEQUENCE 



POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

DISABLE SUPERVISOR D-SPACE 

SET UP RO FOR 4K RESIDENT R/y 

MAKE KIPAR4 RESIDENT 

MAKE UDPDR4 RESIDENT 

.•BRANCH TO NEXT TEST 



MM TRAP 

^22^ 
k222 
4223 
i.22U 
(.225 
4226 
4227 
4228 



11/44 MEM MGMT PRT B MACRO 
HANDLER FOR the ABOVE TEST 



Mil 13 12-JAN-82 12:19 PAGE 



N 10 
97 



SEQUENCE 



033564 
033572 
033600 
033606 
033612 
033616 

033620 
033624 
033630 



013737 
013737 
013737 
012637 
012637 
104040 

013746 
013746 
000002 



177572 
177574 
177576 
001260 
001262 



001262 
001260 



001264 
001266 
001270 



MFPDVl 



;F0R 



.S8TTL 
NOV 

nov 
nov 
«o\ 

MOV 
ERROR 
TIGHTER 
MOV 
MOV 
RTI 



FOR THE ABOVE TEST 
.SAVE WWO FOR ERROR 
;SAVE MMR1 
;SAVE MMR2 
.•SAVE PC t 



TYPE OUT 
FOR ERROR TVPEOUT 
FOR ERROR TYPEOUT 
PS OF TRAP 



m TRAP HANDLER 
W1R0.UASSR0 
MMR1 .WASSR1 
nnR2.UASSR2 
(KSP)*.TRAPPC 
(KSP)*.TPAPPS 

♦40 .TRIED TO READ NON-RESIDNT PAGE 

SCOPE LOOP, REPLACE 1ST MOV INSTRUCTION WITH AN "RTI" = 000002 
TRAPPS.-(KSP) ;PUT PC t PS OF TRAP ON STACK 
TRAPPC.-(KSP) 

.•RETURN TO TEST 



B 11 



CKKTBOO 11/44 l^n mj^l PRT B HACRO H1113 12-JAN-82 12:19 PAGE 98 
TEST # 54 - HFPI (USER/PREV USER) WITH USER D-SPACE ENABLED 



SEQUENCE 131 



4240 



033632 

4241 033634 

4242 033642 

4243 033646 

4244 033652 

4245 033660 

4246 033664 
4247 

4248 033670 

4249 033676 

4250 033704 

4251 033712 

4252 033716 

4253 033722 

4254 033724 

4255 033726 

4256 033730 
4257 

4258 033732 

4259 033736 

4260 033742 

4261 033744 

4262 033746 

4263 033750 
4264 

4265 033752 

4266 033756 

4267 033762 

4268 033766 

4269 033770 
4270 

4271 033772 

4272 033776 

4273 034002 

4274 034004 

4275 034006 

4276 034010 
427,- 034012 

4278 034020 

4279 034026 

4280 034034 



000004 
012737 
012700 
010037 
052737 
105037 
105037 

012737 
012737 
012737 
012702 
004737 
006512 
000240 
104037 
005726 

012702 
004737 
006522 
000240 
104037 
005726 

012702 
004737 
006537 
104037 
005726 

012702 
004737 
006542 
000240 
104037 
005726 
042737 
012737 
112737 
000423 



000600 
036514 
100000 
000001 
172230 
172310 

002516 
170340 
034036 
100000 
002464 



100000 
002464 



100000 
002464 
100000 



100002 
002464 



000001 
000340 
000006 



SBTTL TEST # 34 - RFPI (USER/PREv USER) WITH USER D-SPACE ENABLED 

'test 34 «FPI (USER/PREV USER) WITH USER D-SPACE ENABLED 

THIS TEST CHECCS THAT IF THE INSTRUCTION IS AN HfPI AND BOTH THE 
PRESENT AND PREVIOUS MODES ARE USER. THEN D-SPACE IS USED IF IT IS 
ENABLED. IN THIS WAY AN OPERATING SYSTEM CAN MAKE PROPRETARr CODE 
"EXECUTE ONLV" FOR THE USER. 

IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT WILL OCCUR AND 
TRAP TO nFPIV6, WHERE THE ERRORS ARE REPORTED. 



1 77670 
172516 



001110 
002520 
002622 



172516 
177776 
172310 



TST34: SCOPE 
MOV 
MOV 
MOV 
BIS 
CLR8 
CLR8 

;THE FOLLOWING 
MOV 
MOV 
MOV 
MOV 
JSR 
MFPI 
NOP 
ERROR 
TST 

;THE FOLLOWING 
MOV 
JSR 
MFPI 
NOP 
ERROR 
TST 

;THE FOLLOWING 
MOV 
JSR 
MFPI 
ERROR 
TST 

;THE FOLLOWING 
MOV 
JSR 
MFPI 
NOP 
ERROR 
TST 
BIC 
MOV 
MOVB 
BR 



#600.UDPAR4 
/»36514.R0 
RO.a^l 00000 
#8IT0,MMR3 
SDPDR4 
KIPDR4 
WILL TEST DSTM=1 
#MFPI LP, SLPERR 
#170340,MFPIPS 
#MFPIV6,MFPIVC 
#1 00000, R2 
PC. MFPI TS 
(R2) 

♦37 
(SP) + 
WILL TEST DSTM=2 
/»1 00000. R2 
PC. MFPI TS 

♦37 
(SP) + 
WILL TEST DSTM=3 
#1 00000. R2 
PC, MFPI TS 

a#i 00000 

♦37 

(SP) + 
WILL TEST DSTM=4 
#1 )0002,R2 
PC .MFPI TS 
-(R2) 

+37 
(SP) + 

#8IT0,MMR3 
#340. PSW 
*6,KIPDR4 
TST35 



MAP UDPAR4 TO 12K 
LOAD DATA PATTERN INTO RO 
LOAD DATA PATTERN INTO PHYS. 100000 
ENABLE USER D-SPACE 
MAKE SDPDR4 NON-RESIDENT 
MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 
MFPI 

SET LOOP ON ERROR POINTER TO HFPILP IN SUBROUTINE 
SET PREVIOUS AND CURRENT MODE TO LOCATION IN SU8RTN 
PUT ADDRESS Of THIS TEST'S TRAP CATCHER IN HFPIVC 
LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING THE MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 100000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBROUTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI 

LOAD VIRTUAL ADDRESS INTO R2 
GO DO TEST USING THE MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 100000 
NOT MODE 3. 6 OR 7 - NEEDED FOR SUBRQJTINE LOAD 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
HFPI 

LOAD VIRTUAL ADDRESS INTO R2 
GO 00 TEST USING THE MFPI INSTRUCTION LOCATED 
<HERE - READ FROM PHYSICAL 100000 
RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 
POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 
MFPI 

LOAD VIRTUAL ADDRESS INTO R2 

GO DO TEST USING THE MFPI INSTRUCTION LOCATED 

<HERE - READ FROM PHYSICAL 100000 

NOT MODE 3. 6 OR 7 - NEEDED «^0R SUBROUTINE LOAD 

RETURN IS HERE FOR ERROR - WRONG DATA WAS FETCHED 

POP EXCESS RETURN OFF STACK - LOOPING NOT DONE 

DISABLE USER D-SPAfE 

MAKE PRESENT MODE KERNAL 

MAKE KIPDR4 RESIDENT 

.•BRANCH TO NEXT TEST 



.Kr.TBDO 
TRAP 

^282 
4283 

A285 
A286 
4287 
4288 
4289 
4290 
4291 
4292 



1W44 HEM MGMT PRT B 
CATCHER FOR ABOVE TEST 



034036 
034044 
034052 
034060 
034064 
034070 

034072 
034076 
034102 



013737 
013737 
013737 
012637 
012637 
104040 



177572 
177574 
177576 
001260 
001262 



013746 001262 
013746 001260 
000002 



MACRO Ml 113 12-JAN-82 12:19 PAGE 



C 11 
99 



SEQUENCE 



.SBTTL 
001264 MFPJV6: MOV 
001266 MOV 
001270 MOV 
MOV 
MOV 
ERROR 



MM TRAP CATCHER FOR ABOVE TEST 



MMRO.yASSRO 
MMR1 .UASSRI 
MNR2,UASSR2 
(KSP)*.TRAPPC 
(KSP)+,TRAPPS 
♦ 40 



.•SAVE MMRO FOR ERROR TrPEOUT 

.-SAVE MMR1 FOR ERROR TVPEOUT 

.•SAVE MHR2 FOR ERROR TVPEOUT 

.•SAVE PC ( PS OF TRAP 



; TRIED TO READ NON-RESIDENT PAGE 
;FOR TIGHTER SCOPE LOOP. REPLACE 1ST MOV INSTRUCTION WITH AN "RTl" = 000OO2 
MOV TRAPPS,-(KSP) .-PUT PC ( PS OF TRAP ON STAC»C 
MOV TRAPPC.-(KSP) 

RTI .-RETURN TO TEST 



CUKTBDO 11/44 WEH HG«T PRT B RACRO H1113 12-JAN-82 12:19 PAGE 
TEST # 3S - TEST CSH INSTRUCTION - ILLEGAL KERNEL MODE 



D 11 
100 



SEQUENCE 133 



4300 



034104 


000004 






TST35; 


SCOPE 




4301 034106 


005037 


172516 






CLR 


HMR3 


4302 054112 


AAC AT^ 

005037 


\7777b 






CLH 


PSU 


4303 034116 


013737 


000010 


001204 




MOV 


RESVEC.$TMP3 


4304 034124 


012737 


034140 


000010 




MOV 


#1$.RESVEC 


4305 034132 


005237 


177572 






INC 


MMRO 


4306 034136 


007000 








CSMO 




4307 034140 


013737 


001204 


000010 


1$: 


MOV 


$TMP3.RESVEC 


4308 034146 


005037 


177572 






CLR 


MMRO 


4309 034152 


005037 


M777t 






CLR 


PSW 


4310 034156 


022726 


034140 






CMP 


#1$.(SP)* 


4311 034162 


001403 








BEO 


2$ 


4312 034164 


022626 








CMP 


(SP)*.(SP)* 


4313 034166 


104041 








ERROR 


♦41 


4314 034170 


000401 








BR 


TST36 


4315 034172 


005726 






2S: 


TST 


(SP)* 



S8TTL TEST * 35 - TEST CSM INSTRUCTION - ILLEGAL KERNEL MODE 
**************************************************************** 

•TEST 35 TEST CSM INSTRUCTION - ILLEGAL KERNEL MODE 

'* THIS TEST CHECKS OUT THE CSM (CALL SUPERVISOR MODE) 

* INSTRUCTION TO MAKE SURE CSM IS ILLEGAL WHEN DISABLED 

• IN KERNEL MODE. 



MAKE SURE MMR3 IS CLEARED, DISABLING CSM 
MAKE SURE PSW PREVIOUS:CURRENT=KERNEL 
SAVE TRAPS TO 10 VECTOR 
TRAPS TO 10 GO TO 1$ 
TURN ON MEMORY MANAGEMENT 
CSM RO 

RESTORE TRAPS TO 10 VECTOR 
TURN OFF MEMORY MANAGEMENT 
RETURN TO KERNEL MODE 
SEE IF IT WAS AN EXPECTED TRAP 
BRANCH TO RESTORE STACK IF IT WAS 
CORRECT STACK 

ILLEGAL CSM DID NOT TRAP TO 10 
.'BRANCH AROUND STACK CORRECTION 
CORRECT STACK 



CKKTBOO 11/44 HE« HGHT PRT B MACRO NIIIS 12-JAN-82 12:19 
TEST # 56 - TEST CS« INSTRUCTION - ILLEGAL SUPERVISOR NODE 



PAGE 



E 11 
101 



SEQUENCE 



4323 



ILLEGAL SUPERVISOR MODE 



sbttl test # 36 - test csh instruction 
West 36 test csh instruction - illegal supervisor mode 



THIS TEST CHECKS OUT THE CSM (CALL SUPERVISOR MODE) 
INSTRUCTION TO MAKE SURE CSM IS ILLEGAL WHEN DISABLED 
IN SUPERVISOR MODE. 



034174 


000004 






TST36: 


SCOPE 




4324 034176 


005037 


172516 






CLR 


MMR3 


4325 034202 


052737 


040000 


177776 




BIS 


#40000. PSW 


4326 034210 


013737 


000010 


001204 




MOV 


RESVEC,$TMP3 


4327 034216 


012737 


034232 


000010 




MOV 


#1$.RESVEC 
MMRO 


4328 034224 


005237 


177572 






INC 


4329 034230 


007000 








CSMO 




4330 034232 


013737 


001204 


000010 


1S: 


MOV 


$TMP3.RESVEC 


4331 034240 


005037 


177572 






CLR 


MMRO 


4332 034244 


005037 


177776 






CLR 


PSW 


4333 034250 


022726 


034232 






CMP 


#1$.(SP)* 


4334 034254 


oouo: 








BEO 


2$ 


4335 034256 


022626 








CMP 


(SP)*.(SP)* 


4336 034260 


104041 








ERROR 


♦41 


4337 034262 


000401 








BR 


TST37 


4338 0342<««4 


005726 






2$: 


TST 


ISP)* 



MAKE SURE MMR3 IS CLEARED, DISABLING CSM 

GO TO SUPERVISOR MODE 

SAVE TRAPS TO 10 VECTOR 

TRAPS TO 10 GO TO 1$ 

TURN ON MEMORY MANAGEMENT 

CSM RO 

RESTORE TRAPS TO 10 VECTOR 

TURN OFF MEMORY MANAGEMENT 

GO BACK TO KERNEL MODE 

SEE IF IT WAS AN EXPECTED TRAP 

BRANCH AROUND ERROR CALL IF IT WAS 

CORRECT STACK 

ILLEGAL CSM DID NOT TRAP TO 10 
.•BRANCH AROUND STACK CORRECTION 
CORRECT STACK 



CKKTBDO 11/44 nin MGHT PRT B MACRO H1113 12-JAN-82 12:19 PAGE 
TEST * 37 - TEST CSH INSTRUCTION - ILLEGAL USER «ODc 



F 11 
102 



SEQUENCE 135 



4346 



434 7 
4348 
4349 
4350 
4351 
4352 
4353 
4354 
4355 
4356 
4357 
4358 
4359 
4360 
4361 



034266 
034270 
034274 
034302 
034310 
034316 
034322 
034324 
034332 
034336 
034342 
034346 
034350 
034352 
054354 
034356 



S8TTL TEST # 37 - TEST CSH INSTRUCTION - ILLEGAL USER NODE 

West 37 test csn instruction - illegal user mode 









; • 


THIS TEST checks OUT THE 


CSM (CALL SUPERVISOR MODE) 








; • 


instruction TO MAKE SURE 


CSM IS ILLEGAL WHEN DISABLED 








; • 


IN USER 


MODE. 




000004 






tsT37: 


SCOPE 




MAKE SURE MMR3 IS CLEARED, DISABLING CSM 


005037 


172516 






CLR 


MMR3 


052737 


140000 


177776 




BIS 


#140000. PSW 


GO TO USER MODE 


013737 


000010 


001204 




nov 


RESVEC,$TMP3 


SAVE TRAPS TO 10 VECTOR 


012737 


034324 


000010 




nov 


#1$.RESVEC 


TRAPS TO 10 60 TO 1$ 


005237 


177572 






INC 


MMRO 


TURN ON MEMORY MANAGEMENT 


007000 








CSMO 


$TMP3,RESVEC '. 


CSM RO 


013737 


001204 


000010 


1$: 


MOV 


•RESTORE TRAPS TO 10 VECTOR 


005037 


177572 






CLR 


MMRO 


■TURN Off MEMORY MANAGEMENT 


005037 


177776 






CLR 


PSU 


•RETURN TO KERNEL MODE 


022726 


034324 






CMP 


#1$.(SP)* 


•SEE If IT WAS AN EXPECTED TRAP 


001403 








BEQ 


2$ 


•BRANCH AROUND ERROR CALL If IT WAS 


022626 








CMP 


(SP)*,(SP)* 


;CORRECT STACK 


104041 








ERROR 


♦41 


; ILLEGAL CSM DID NOT TRAP TO 10 


000401 








BR 


TST40 


; .-BRANCH AROUND STACK CORRECTION 


005726 






2$: 


tst 


(SP)* 


; CORRECT STACK 



1 
i 
1 
1 
1 
t' 
n 



G 11 

CICKTBDO 11/44 MEM MGMT PRT B MACRO M1113 12-JAN-82 12:19 PAGE 103 
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SEQUENCE 136 



4369 

















4370 034362 


052737 


000010 


172516 




BIS 


#8IT3.MMR3 


4371 034370 


005037 


177776 






CLR 


PSW 


4372 034374 


013737 


000010 


001204 




MOV 


RESVEC.$TMP3 


4373 034402 


012737 


034416 


000010 




MOV 


#1$.RESVEC 


4374 034410 


005237 


mbll 






INC 


MMRO 


4375 034414 


007000 








CSMO 




4376 034416 


013737 


001204 


000010 


1$: 


MOV 


$TMP3,RESVEC 


4377 034424 


005037 


}77572 






CLR 


MMRO 


4378 034430 


022726 


034416 






CMP 


#1$.(SP)+ 


4379 034434 


001403 








BEO 


2$ 


4380 034436 


022626 








CMP 


(SP)+.(SP)+ 


4381 034440 


104041 








ERROR 


+41 


4382 034442 


000401 








BR 


73741 


4383 034444 


005726 






2$: 


TST 


(SP) + 



SBTTL TEST # 40 - TEST CSM INSTRUCTION - ILLEGAL KERNEL MODE 

•TEST 40 TEST CSM INSTRUCTION - ILLEGAL KERNEL MODE 

**************************************************************** 

THIS TEST CHECKS OUT THE CSM (CALL SUPERVISOR MODE) 

• INSTRUCTION TO MAKE SURE CSM IS ILLEGAL WHEN ENAULED 

• IN KERNEL MODE. 



TURN ON CSM ENABLE 

MAKE SURE PSW PREVIOUS=CURRENT=KERNEL 
SAVE TRAPS TO 10 VECTOR 
TRAPS TO 10 GO TO 1$ 
TURN ON MEMORY MANAGEMENT 
CSM RO 

RESTORE TRAPS TO 10 VECTOR 
TURN OFF MEMORY MANAGEMENT 
SEE IF IT WAS AN EXPECTED TRAP 
BRANCH AROUND ERROR CALL IF IT WAS 
CORRECT STACK 

ILLEGAL CSM DID NOT TRAP TO 10 
.-BRANCH AROUND STACK CORRECTION 
CORRECT STACK 
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SEQUENCE 157 



4392 



4393 
4394 
4395 
4396 
4397 
4398 
4399 
4400 
4401 
4402 
4403 



034446 
034450 
034454 
034460 
034466 
034474 
034502 
034506 
034512 
034514 
034520 
034524 



000004 
012700 
004737 
012737 
012737 
012737 
012706 
004737 
000000 
005037 
005037 
000137 



S8TTL TEST # 41 - TEST CSM INSTRUCTION - I-SPACE SUPERVISOR MODE 



*TEST 41 



TEST CSM INSTRUCTION - I-SPACE SUPERVISOR MODE 



• THIS TEST CHECKS OUT THE CS« (CALL SUPERVISOR MODE) 

• INSTRUCTION TO HAKE SURE CSM IS LEGAL WHEN ENABLED 

• IN SUPERVISOR MODE, AND FOR A CHECK OF THE PARAMETERS 

• PUSHED ON THE STACK. 



052525 
002060 
000600 
000032 
040000 
000700 
034530 

177776 
172260 
035344 



1 72260 
172516 
035320 



TST41: SCOPE 

MOV *52525,R0 

JSR PC.APRINIT 

MOV #600.SDPAR0 

MOV #32.MMR3 

MOV #40000, PCSMPS 

MOV *SUPSTK,SSP 

JSR PC.CSMSU8 

.WORD 0 

CLR PSU 

CLR SDPARO 

JMP TST42 



SET UP RO 

RESET ALL MEMORY MANAGEMENT REGISTERS 
IF UE 60 TO D-SPACE, FLAG AS AN ERROR 
ENABLE CSM, 22-81 T, SUPERVISOR SPACE 
SET PRECSM PS IN LOCATION 
SETUP SUPERVISOR STACK POINTER 
TEST CSM INSTRUCTION SUBROUTINE 
0 ADDED TO ADDRESS OF TRAP VECTOR 
RETURN TO KERNEL MODE 
RESET SDPARO TO FIRST 4K 
JUMP OVER THE CSM SUBROUTINE 
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iSROUTlNE TO ""HECK OPERATION OF AN EXECUTABLE CSM INST'N 















.SBTTL 


SUBROUTINE TO CHI 


^^05 


034530 


012605 






CSMSU8: 


HOV 


{SP)*.R5 


4406 


034532 


012737 


000340 


}77776 




HOV 


#340. PSW 


4407 


034540 


010037 


035324 






MOV 


RO.PCSMRO 
(R5)*,R4 


4408 


034544 


012504 








MOV 


4409 


034546 


010537 


035342 






MOV 


R5. RETURN 


4410 


034552 


012737 


034704 


035316 




MOV 


*5$.D0WELP 


4411 


034560 


012764 


034622 


000010 




MOV 


*2$.RESVEC(R4) 


4412 


034566 


012737 


034614 


001110 




MOV 


#1$.$LPERR 


4413 


034574 


053737 


035320 


}7777(i 




BIS 


PCSMPS.PSW 


4414 


034602 


010637 


035322 






MOV 


SP.PCSMSP 


4415 


034606 


162737 


000006 


035322 




SU8 


#6,PCSMSP 


4416 


034614 


005237 


177572 




1$: 


INC 


MMRO 


4417 


034620 


007000 








CSMO 




4418 


034622 


012737 


000012 


000010 


2$: 


MOV 


#RESVEC*2.RESVEC 


4419 


034630 


022716 


034622 






CMP 


#2$,(SP) 


4420 


034634 


001011 








BNE 


4$ 


4421 


034636 


012737 


000340 


\7777t 


3$: 


MOV 


*340.PSW 


4422 


034644 


005037 


177572 






CLR 


MMRO 


4423 


034650 


022626 








CMP 


(SPH.(SP)* 


4424 


034652 


104051 








ERROR 


♦51 


4425 


034654 


000177 


000462 






JMP 


SRETURN 


4426 


034660 


010637 


035336 




4$: 


MOV 


SSP.ACSMSP 


4427 


034664 


012637 


035326 






MOV 


(SP)+. CSH1ST 


4428 


034670 


012637 


035330 






MOV 


(SP) ♦.CSM2ND 


4429 


034674 


012637 


035332 






MOV 


(SP) +.CSM3RD 


4430 


034700 


000177 


000412 






JIP 


9D0UELP 


4431 


034704 


013703 


035320 




5$: 


MOV 


PCSMPS.R3 


4432 


034710 


042703 


037777 






BIC 


#37777. R3 


4433 


034714 


000241 








CLC 




4434 


034716 


006003 








ROR 


R3 


4435 


034720 


006003 








RDR 


R3 


4436 


034722 


052703 


040000 






BIS 


#8IT14.R3 


4437 


034726 


013737 


177776 


035334 




MOV 


PSW.ACSMPS 


4438 


034734 


042737 


007777 


035334 




BIC 


#7777,ACSMPS 


4439 


034742 


020337 


035334 






CMP 


R3.ACSMPS 


4440 


034746 


001403 








6EQ 


6S 


4441 


034750 


005037 


177572 






CLR 


MMRO 


4442 


034754 


104042 








ERROR 


♦42 


4443 


034756 


052737 


000001 


^77^72 


6S: 


BIS 


#81700. MMRO 


4444 


034764 


013737 


U7776 


035334 




MOV 


PSW.ACSMPS 


4445 


034772 


042737 


057777 


035334 




BIC 


#37777. ACSMPS 


4446 


035000 


023737 


035340 


035334 




CMP 


SUPERM.ACSHPS 


4447 


035006 


001414 








BEQ 


8S 


4448 


035010 


012737 


034756 


035316 




MOV 


#6$.D0WELP 


4449 


035016 


005037 


\77'>72 






CLR 


MMRO 


4450 


035022 


013703 


035334 






MOV 


ACSMPS. R3 


4451 


035026 


052703 


040000 






BIS 


#8IT14.R3 


4452 


035032 


042703 


100000 






BIC 


#BIT15.R3 


4453 


035036 


104042 








ERROR 


♦42 


4454 


035040 


052737 


000001 


}77572 


8S: 


BIS 


#81 TOO. MMRO 


4455 


035046 


013704 


y7777b 






MOV 


PSW.R4 


4456 


035052 


042704 


* t ^^^^ 

147777 






BIC 


#147777. R4 


4457 


035056 


006304 








ASL 


R4 


4458 


035060 


006304 








ASL 


R4 


4459 


035062 


013702 


035320 






MOV 


PCSMPS.R2 


4460 


035066 


042702 


057777 






BIC 


057777.R2 



SEQUENCE 138 



CK OPERATION Of AN EXECUTABLE CSM INST'N 
PUT RETURN ADDRESS INTO R5 
KERNEL MODE 
STORE PRE CSM RO 
MOVE OFFSET TO R4 

SET RETURN LOCATION ADDRESS TO LOCATION 'RETURN' 

MOVE ADDRESS FOR INITIAL TESTING TO DOWELP 

SETUP TRAPS TO 10 VECTOR TO 2$ 

SETUP LOOP ON ERROR TO 1$ 

PUT USER/SUPERVISOR IN THE PSU 

MOVE STACK POINTER VALUE TO PCSMSP 

SUBTRACT 6 FROM PCSMSP - EXPECT 3 PUSHES ON STACK 

TURN ON MEMORY MANAGEMENT 

RESTORE TRAPS TO 10 VECTOR 

SEE IF CSM ABORTED 

BRANCH IF IT DIDN'T TO EXECUTE TEST 

GO BACK TO KERNEL PRIORITY 7 

TURN OFF MEMORY MANAGEMENT 

CORRECT STACK 

CSM ABORTED WHEN IT SHOULD NOT HAVE 
JUMP TO ADDRESS PRESTORED IN LOCATION RETURN 
SAVE AFTER CSM STACK POINTER 
;POP 1ST WORD OFF STACK 
:POP 2ND WORD OFF STACK 
POP 3RD WORD OFF STACK 
JUMP TO LOCATION IN DOWELP 
;PUT PRE-CSM PSW IN R3 
;WIPE OUT ALL BITS EXCEPT <15:14>. 
CLEAR THE CARRY BIT 
;MOVE <15:14> OVER TO 
;THE RIGHT TO <13:12>. 

;AND SET <14>. PUTTING CURRENT=SUPERVISOR IN EXPECTED LOC 
;MOVE CURRENT PSW TO ACSMPS 
;WIPE OUT ALL BITS BUT <15:12> 

;SEE IF PSW STATUS BITS MATCHES CALCULATED VALUE 

;6RANCH AROIMD ERROR CALL IF OK 

;TURN OFF MEMORY MANAGEMENT 

;NOT SUPERVISOR MODE 

iMAKE SURE MEMORY MANAGEMENT IS ON 

iMOVE CURRENT PSW TO ACSW»S 

iCLEAR ALL BITS EXCEPT <15:14> 

;SEE IF SUPERVISOR MODE 

;8RANCH AROLWD ERROR CALL IF OK 

;SET ADDRESS FOR THIS CHECK TO DOWELP 

;TURN OFF MEMORY MANAGEMENT 

;MOVE RECEIVED CONTENTS TO R3 

;SET BIT 14 AND 

; CLEAR BIT 15 

;NOT SUPERVISOR MODE 

;MAKE SURE MEMORY MANAGEMENT IS ON 

;MOVE CURRENT PSW TO R4 

;CLEAR ALL BITS EXCEPT <13:12> 

;MOVE <13:12> BITS IN R4 

;T0 THE <15:U> POSITION 

;MOVE PRECSM PSW TO R2 

;CLEAR BITS 13 TO 0 
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SUBRCXJTINE TO CHECK OPERATION OF AN EXECUTABLE CS« INST'N 



U61 035072 


020204 








CMP 


R2.R4 


A462 03507A 


001406 








BEQ 


loi 


4463 035076 


012737 


035040 


035316 




MOV 


m, DOWELP 


4A6A 035104 


005037 


177572 






CLR 


MMRO 


4465 035110 


104043 








ERROR 


♦43 


4466 035112 


052737 


000001 


177572 


lOS: 


BIS 


#81 TOO. MMRO 


4467 035120 


023737 


035336 


035322 




CMP 


ACSMSP,PCSMSP 


4468 035126 


001406 








BEQ 


12$ 


4469 035130 


012737 


035112 


035316 




MOV 


#10$. DOWELP 


4470 035136 


005037 


177572 






CLR 


MMRO 


4471 035142 


104044 








ERROR 


♦44 


4472 035144 


052737 


jOOOOI 


177572 


12$: 


BIS 


#BI TOO, MMRO 


4473 035152 


020037 


J35326 






CMP 


RO.CSMIST 


4474 035156 


001406 








BEQ 


14$ 


4475 035160 


012737 


035144 


035316 




MOV 


#12$. DOWELP 


4476 035166 


0050 ; 7 


177572 






CLR 


MMRO 


4477 035172 


1C4045 








ERROR 


♦45 


4478 035174 


052737 


000001 


177572 


14$: 


BIS 


#BI TOO. MMRO 


4479 035202 


022737 


034622 


035330 




CMP 


#2$,CSM2ND 


4480 035210 


001411 








BEQ 


16$ 


4481 035212 


012737 


035174 


035316 




MOV 


#14$. DOWELP 


h482 035220 


005037 


177572 






CLR 


MMRO 


4483 035224 


012737 


034622 


001176 




MOV 


#2$.$TMP0 


448^ 035232 


104046 








ERROR 


♦46 


4485 035234 


052'37 


000001 


177572 


16$: 


BIS 


#BI TOO, MMRO 


4486 035242 


032737 


000017 


035332 




BIT 


#17.CSM3RD 


4487 035250 


001406 








BEQ 


18$ 


4488 03^252 


012737 


035234 


035316 




MOV 


#16$. DOWELP 


4489 035260 


005037 


177572 






CLR 


MMRO 


4490 035264 


104047 








ERROR 


♦47 


4491 035266 


022737 


034704 


035316 


18$: 


CMP 


#5$. DOWELP 


4492 035274 


001406 








BEQ 


19$ 


4493 035276 


032777 


001000 


143634 




BIT 


#BIT09.aSWR 


4494 035304 


001402 








BEQ 


19$ 


4495 035306 


000137 


034614 






JMP 


1$ 


4496 035312 


000177 


00002A 




19$: 


JMP 


aRETURN 


4497 














4498 035316 


000000 






DOWELP 


■ .WORD 


0 


4499 035320 


000000 






PCSWS 


■ .WORD 


0 


4500 035322 


000000 






pcsnsp 


.WORD 


0 


4501 035324 


000000 






PCSMRO 


.WORD 


0 


4502 035326 


000000 






CSMIST 


.WORD 


0 


4503 035330 


000000 






CSM2ND 


.WORD 


0 


4504 035332 


000000 






CSM3RD 


• .WORD 


0 


4505 035334 


000000 






ACSMPS 


.WORD 


0 


4506 035336 


000000 






ACSMSP 


.WORD 


0 


4507 035340 


040000 






SUPERM 


.WORD 


40000 


4508 035342 


000000 






RETURN 


.WORD 


0 



SEQUENCE 139 



SEE IF PREVIOUS MODE IS OK 

BRANCH AROUND ERROR CALL IF OK 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

WRONG PREVIOUS MODE 

MAKE SURE MEMORY MANAGEMENT IS ON 

SEE IF STACK POINTER VALUE WAS TRANSFERED 

BRANCH AROUND ERROR CALL IF SO 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

INCORRECT STACK 

MAKE SURE MEMORY MANAGEMENT IS ON 

COMPARE RO WITH THE ARGUMENT THAT WAS ON STACK 

IF EQUAL. BRANCH AROUND ERROR 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

INCORRECT ARGUMENT 

MAKE SURE MEMORY MANAGEMENT IS ON 

SEE IF UPDATED PC WAS CORRECT 

BRANCH AROUND ERROR IF OK 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

MOVE EXPECTED UPDATED PC TO $TMPO 

WRONG PC 

MAKE SURE MEMORY MANAGEMENT IS ON 

SEE IF PSW <3:0> WERE CLEARED 

BRANCH AROUND ERROR CALL IF OK 

SET ADDRESS FOR THIS CHECK TO DOWELP 

TURN OFF MEMORY MANAGEMENT 

BITS <3:0> SET IN PSW 

SEE IF ANY ERRORS THIS TIME AROUND 

BRANCH TO NORMAL RETURN JUMP IF NOT 

SEE IF LOOP ON ERROR IS SET 

BRANCH IF SO 

JUMP BACK FOR LOOP ON ERROR 

JUMP BACK TO RETURN ADDRESS IN LOCATION RETURN 

LOCATION HOLDING ADDRESS TO SHORTEN POSSIBLE ERROR LOOP 

LOCATION TO STORE PRE-CSM PSW 

LOCATION TO STORE PRE-CSM STACK POINTER 

LOCATION TO STORE PRE-CSM RO VALUE 

LOCATION TO STORE 1ST WORD POPPED AFTER CSM EXECUTION 

LOCATION TO STORE 2ND WORD POPPED AFTER CSM EXECUTION 

LOCATION TO STORE 3RD WORD POPPED AFTER CSM EXECUTION 

LOCATION TO STORE POST-CSM PSW 

LOCATION TO STORE POST-CSM STACK POINTER 

LOCATION TO STORE VALUE OF PRESENT MODE=SUPERVl SOR 

LOCATION TO STORE RETURN ADDRESS OF THE CSMSUB 
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SEQUENCE 140 



4517 



4518 
4519 
4520 
4521 
4522 
4523 
4524 
4525 
4526 



035344 
035346 
035354 
035362 
035370 
035376 
035402 
035406 
035410 
035414 



000004 
012737 
012737 
052737 
012737 
012706 
004737 
060000 
005037 
005037 



SBTTL TEST # 42 - TEST CSH INSTRUCTION - 0-SPACE SUPERVISOR MODE 
ilEST 42 TEST CSH INSTRUCTION - D-SPACE SUPERVISOR MODE 

i THIS TEST CHECKS OUT THE CS« (CALL SUPERVISOR MODE) 

• INSTRUCTION TO HAKE SURE CSM IS LEGAL WHEN ENABLED 

• IN SUPERVISOR MODE. AND FOR A CHECK OF THE PARAMETERS 

• PUSHED ON THE STACK. 



000032 
040000 
040000 
000600 
000700 
034530 

177776 
172240 



172516 
035320 
177776 
172240 



TST42: SCOPE 

MOV #32,MMR3 

MOV #40000. PCSMPS 

BIS #Bin4,PSU 

MOV #600.5 I PARO 

MOV #SUPSTK.SSP 

JSR PC.CSMSUB 

•WORD 60000 

CLR PSW 

CLR SIPARO 



ENABLE 22-BIT. CSM. SUPERVISOR 
LOAD PRECSM LOCATION 
GO TO SUPERVISOR MODE 

IF UE GO TO I -SPACE. FLAG IT AS AN ERROR 
SETUP SUPERVISOR STACK POINTER 
TEST CSM INSTRUCTION SUBROUTINE 

60000 ADDED TO ADDRESS OF TRAP VECTOR 
RETURN TO KERNEL MODE 
RESET SIPARO TO FIRST 4K 
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SEQUENCE Ul 



4535 



4536 
4537 
4S38 
4539 
4540 
4541 
4542 
4543 
4544 



035420 
035422 
035430 
035436 
035444 
035452 
035456 
035462 
035464 
035470 



000004 
012737 
012737 
052737 
012737 
012706 
004737 
000000 
005037 
005037 



S8TTL TEST * 43 - TEST CSH INSTRUCTION - I-SPACE USER MODE 



•TEST 43 



TEST CSM INSTRUCTION - I-SPACE USER MODE 



'* THIS TEST CHECKS OUT THE CSM (CALL SUPERVISOR MODE) 

• INSTRUCTION TO MAKE SURE CSM IS LEGAL WHEN ENABLED 

• IN USER MODE, AND FOR A CHECK OF THE PARAMETERS 

• PUSHED ON THE STACK. 



000031 172516 

140000 035320 

140000 177776 

000600 177660 
000600 
034530 

177776 
177660 



TST43: SCOPE 

MOV *31.MMR3 

MOV f 140000. PC SMPS 

BIS #140000. PSW 

MOV #600.UDPAR0 

MOV /rUSESTK.SSP 

JSR PC.CSMSUB 

.WORD 0 

CLR PSW 

CLR UDPARO 



ENABLE 22-81 T. CSM USER 
LOAD PRECSM LOCATION 
GO TO USER MODE 

IF WE GO TO D-SPACE. FLAG AS AN ERROR 
SETUP USER STACK POINTER 
TEST CSM INSTRUCTION SUBROUTINE 
0 ADDED TO ADDRESS OF TRAP VECTOR 
RETURN TO KERNEL MODE 
RESET UDPARO TO FIRST 4K 



Lf 

LC 

m 
m 

m 

MF 
Mf 
MF 
MF 
Mf 
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SEQUENCE U2 



4553 



035474 

4554 035476 

4555 035504 

4556 035512 

4557 035520 

4558 035524 

4559 035530 

4560 035532 

4561 035536 



000004 
012737 
012737 
012737 
012706 
004737 
000000 
005037 
005037 



000031 
140000 
000600 
000600 
034530 

177776 
177640 



S8TTL TEST # 44 - TEST CSM INSTRUCTION - D-SPACE USER MODE 
iTEST*44 TEST CSM INSTRUCTION - D-SPACE USER MODE 

i THIS TEST CHECKS OUT THE CSM (CALL SUPERVISOR MODE) 

• INSTRUCTION TO MAKE SURE CSM IS LEGAL WHEN ENABLED 

• IN USER MODE. AND FOR A CHECK OF THE PARAMETERS 

• PUSHED ON THE STACK. 



172516 
035320 
177640 



TST44: SCOPE 

MOV #31-MMR3 

MOV #140000. PC SMPS 

MOV #600.UIPAR0 

MOV #US£STK,SSP 

JSR PC.CSMSUB 

.UORD 0 

CLR PSW 

CLR UIPARO 



ENABLE 22-81 T. CSM USER 

LOAD PRECSM LOCATION 

IF WE GO TO I -SPACE, FLAG AS AN ERROR 

SETUP USER STACK POINTER 

TEST CSM INSTRUCTION SUBROUTINE 

0 ADDED TO ADDRESS OF TRAP VECTOR 
RETURN TO KERNEL MODE 
RESET UIPARO TO FIRST 4K 



MF 

Mr 
Mr 



M' 
N' 
N 
N 
N 



N 
N 
M 



I 
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SEQUENCE U3 



^567 



4568 
4569 
4570 
4571 
4572 
4573 
4574 
4575 
4576 
4577 
4578 
4579 
4580 
4581 
4582 
4583 
4584 
4585 
4586 
4587 
4588 
4589 
4590 
4591 
4592 
4593 
4594 
4595 
4596 
4597 
4598 
4599 
4600 
4601 
4602 
4603 
4604 
4605 
4606 
4607 
4608 



035542 
035544 
035552 
035560 
035564 
035570 
035574 
035600 
035606 
035612 
035616 
035622 
035626 
035630 
035632 
035636 
035642 
035644 
035650 
035654 
035656 
035662 
035666 
035672 
035676 
035700 
035704 
035710 
035714 
035716 
035720 
035724 
035726 
035732 
035736 
035742 
035744 
035762 
035764 
035766 
035770 
036006 



000004 
012737 
012737 
012701 
012702 
012703 
012704 
012737 
011237 
012700 
000000 
011637 
021300 
001407 
062706 
011337 
104052 
162706 
021437 
001417 
012637 
012637 
012637 
011437 
104053 
013746 
013746 
013746 
022223 
005724 
062706 
077150 
005037 
005037 
005037 
000430 
007010 
035766 
035762 
052525 
035764 
035762 



177776 
172516 



000010 



040000 
000032 
000007 
035744 
035770 
036006 
035622 
035616 
035764 
000000 
001200 



000006 
001176 

000006 
001200 

001204 
001206 
001210 
001202 

001210 
001206 
001204 



000006 

177572 
T72516 
177776 

007020 007030 



S8TTL 

West 
* 

• **** 

tST45.- 



TEST * 45 - TEST CSM INSTRUCTION - MODE TESTS 

a********************************************************** 

45 TEST CSM INSTRUCTION - MODE TESTS 

THIS TEST EXECUTES THE CSM INSTRUCTION LEGALLr IN MODES 1 THROUGH 7, 
CHECKING FOR PROPER REGISTER INCREMENT/DECREMENT AND THAT ARGUMENT 
CONTENTS IS PROPERLY ON THE STACK 
*********************************************************** 



1$: 

2$: 
3$: 



4$: 



5S: 



035766 
035762 



035766 
035766 



CSMJNS: 

RE6LAB: 

REGCHG: 
REGDAT: 



SCOPE 

MOV #40000, PSW 

MOV #32.W1R3 

MOV *7.R1 

MOV #CSMINS.R2 

MOV #REGCH6,R3 

MOV #REGDAT,R4 

MOV #3$.RESVEC 

MOV (R2).2$ 

MOV fREGLAB.RO 

.WORD 0,0 

MOV (SP).$TMP1 

CMP (R3),R0 

BEO 4$ 

ADD *6,SP 

MOV (R3).$TMP0 

ERROR +52 

sue #6,SP 

CMP (R4).$TMP1 

BEO 5$ 

MOV (SP)+,$TMP3 

MOV (SP)+.$TMP4 

MOV (SP)+,$TMP5 

MOV (R4),$TMP2 

ERROR +53 

MOV $TMP5,-(SP) 

MOV $TMP4.-(SP) 

MOV $TMP3.-(SP) 

CMP (R2)+.(R3)* 

TST (R4)+ 

ADD #6.SP 

SOB R1,1$ 

CLR MMRO 

CLR MMR3 

CLR PSW 

BR SEOP 

.WORD CSM1.CSM2.CSM3, 

.WORD REGLAB42 

.WORD REGLAB-2 

.WORD 52525 

.WORD REGLAB.RE6LAB+2 

.WORD REGLA8-2,REGLAB 



GO TO SUPERVISOR MODE 

ENABLE 22-81 T, CSM, SUPERVISOR 

DO 7 MODES 

LOAD CSM INSTRUCTION POINTER INTO R2 
LOAD REGISTER CHANGE TABLE POINTER TO R3 
LOAD ARGUMENT EXPECTED STACK POINTER TO R4 
SET RETURNS TO 3$ 

MOVE CSM INSTRUCTION TO TEST LOCATION 
RESET RO 

1ST WORD FOR CSM INSTRUCTION, 2ND FOR MODES 6 & 7 

MOVE ARGUMENT WORD TO STMPI 

SEE IF REGISTER CHANGED PROPERLY 

BRANCH IF OK 

POP STACK FOR POSSIBLE ERROR LOOPING 
MOVE EXPECTED DATA TO STMPO 

CSM FAILED TO INCREMENT/DECREMENT REGISTER PROPERLY 
RESTORE STACK POINTER TO PRE-ERROR STATE 
SEE IF CORRECT ARGUMENT WAS LOADED 
BRANCH IF OK 

POP STACK FOR POSSIBLE ERROR LOOPING 



MOVE EXPECTED DATA TO $TMP2 

CSM FAILED TO PUT PROPER ARGUMENT ON STACK 

RESTORE STACK - NO ERROR LOOPING 



INCREMENT R2 AND R3 TO NEXT LOCATIONS 
INCREMENT R4 TO NEXT LOCATION 
POP STACK OF CSM PUSHES 

SUBTRACT 1 AND BRANCH IF NOT ALL MODES CHECKED 
TURN OFF MEMORY MANAGEMENT 
CLEAR HMR3 

RETURN MODE BACK TO KERNEL 
SKIP OVER TABLES AND LOCATIONS 
CSM4,CSM5,CSM6.CSM7 



,REGLAB+2, REGLAB-2, REGLAB-2, REGLAB.REGLAB 
-2 ,REGLAB+2 ,REGLAB+2 , 52525 , REGLAB-2 ,REGLA8*2 



CUKTBDO 11/<,4 ME« NGHT PRT B 
END OF PASS ROUTINE 
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110 



SEOUENCf U4 



.S8TTL END OF PASS ROUTINE 



036024 
036024 
036026 
036032 
036036 
0360. 4 
036046 
036050 
036052 
036054 
056056 
036060 
036066 
036070 
036074 
036076 
036076 
036102 

036122 
036 1 22 

036126 
036130 
036134 
036136 
056142 

036206 
036206 

036212 
036214 
036220 
036224 
036230 
036232 
03623A 
036240 

036242 
036242 
036246 
036250 
036252 
036254 
J36256 



000004 
0050:.7 
005237 
042737 
005327 
000001 
003104 
012737 
000001 
036046 
032737 
001403 
005737 
001453 

104401 
000407 



104405 
005737 
001433 
104401 
000421 



001102 
001232 
'00000 



001232 



104405 
104401 
005037 
013700 
001414 
005046 
012746 
000426 



013700 
001405 
000005 
004710 
000240 
000240 



000077 
001112 

036104 



001232 



013746 001232 



001112 
036144 



•iNCREHENT THE PASS NUMBER (SPASS) 

• TYPE "EHO PASS mXXX TOTAL NUMBER Of ERRORS SINCE LAST REPORT YYYYr" 
•WHERE XXXXX AND YYYYY ARE DECIMAL NUMBERS 
•IF SU12=1 INHIBIT TRACE TRAP 
•IF THERES A MONITOR GO TO IT 
•IF THERE ISN'T JUMP TO LOOP 



$EOP: 



SEOPCT; 



SENDCT; 



1000$: 



;;65$: 
64$: 



013746 00M12 



;;67$: 
66$: 



001221 
001112 
000042 



036242 
000042 



SCLR.T: 



SCOPE 




CLR 


$TSTNM 


INC 


$PASS 


BIC 


#100000. $PASS 


DEC 


(pc; + 


.WORD 


1 


ouT 


SDOAGN 


nOV 


(.PL) * .uKrQ) * 


.WORD 


1 


c c nor T 




Q I T 
Oi 1 




BEG 


1000$ 


TST 


$ERTTL 


BEO 


$GET42 


T VDC 

1 Trt 




QD 


OH* 


A c r 1 7 


V 1 d><. 1 J>/ CNU 


HUV 


CDA CC _ / CD ^ 


T VDI\C 




1 J 1 


tPPTTi 


BEO 


$GET42 


TYPE 


.67$ 


BR 


66$ 


.ASCIZ 


/ TOTAL ERRO 


MOV 


$ERTTL,-(SP) 


TYPDS 




TYPE 


,$CRLF 


CLR 


SERTTL 


MOV 


a#42.R0 


BEO 


SDOAGN 


CLR 


-ISP) 


MOV 


#$CLR.T.-(SP) 


BR 


$RTRN 



MOV 

BEO 

RESET 

JSR 

NOP 

NOP 



S#42.R0 
SDOAGN 

PC.(RO) 



ZERO THE TEST NUMBER 
INCREMENT THE PASS NUMBER 
DON'T ALLOW A NEG. NUMBER 

LOOP? 



;;YES 

; .-RESTORE COUNTER 



;»ARE WE TO PRINT THIS PASS? 
;»8RANCH IF WE ARE 

;»TEST $ERTTL FOR ANY ERRORS THIS PASS 
;»8RANCH IF NO ERRORS THIS PASS 

;;TYPE ASCIZ STRING 
;;GET OVER THE ^SCIZ 



SAVE $PASS FOR TYPEOUT 
TYPE PASS NUMBER 

60 TYPE— DECIMAL ASCII WITH SIGN 
»ANY ERRORS THIS PASS? 
»8RANCH OVER 'TOTAL' REPORT IF NONE 
.-TYPE ASCIZ STRING 
;GET OVER THE ASCIZ 
SINCE LAST REPORT / 



SAVE $ERTTL FOR TYPEOUT 

TOTAL NUMBER OF ERRORS 

GO TYPE— DECIMAL ASCII WITH SIGN 

TYPE CARRIAGE RETURN. LINE FEED 

CLEAR ERROR TOTAL 

GET MONITOR ADDRESS 

BRANCH IF NO MONITOR 

INSURE THE "T" BIT IS CLEAR 

SETUP FOR AN RTI OR RTT 

60 DO AN RTI OR RTT TO LOAD THE PSW 

WITH A CLEARED "T" BIT 

INSURE RO CONTAINS THE MONITORS 

RETURN ADDRESS 

CLEAR THE WORLD 

GO TO MONITOR 

SAVE ROOM 

FOR 



DPM002 
DPM002 
DPM002 
DPM002 



;DPM002 
;DPM002 



CKKTBOO 11/44 HEM nCMT PRT B 
END OF PASS ROUTINE 
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SEQUENCE U5 



356^60 


AAA y A 

000240 






NOP 




056^6? 














104400 






TDAD 


ifcv, vor; 


A f ^ 

056 -'o*! 




AAAA^ A 
0000^0 




D f r 


A ^ 7A 


AT jyyy 


A 1 AAAA 

010000 


14^6t»^ 


BIT 


MO Trio ^CUD 


056276 


AA1 AAC 

001005 






Que 


1 » 


U JO JUV( 




nni ■^i n 

UU 1 J 1 u 




rnM 


4TRT T 


036304 


100402 






BHI 


IS 


036306 


052716 


000020 




BIS 


#20. (SP) 


036312 


012746 


036320 


1$: 


MOV 


moop.-tsp) 


036316 


000002 




SRTRN- 


RTI 





036320 

036320 000137 

036322 020560 

036324 377 

4610 000001 



SLOOP: 

jnp a(pc)* 

SRTNAD: .WORD LOOP 

377 000 SENULL: .BYTE -l.-l.O 

.EVEN 
.END 



;;ACT11 

;:PUSH OLD PSW AND PC ON STACK 
;; CLEAR THE "T" BIT 
;;RUN WITH TRACE TRAP? 

;;JS IT TIME FOR TRACE TRAP 

;;8R IF NO 

;;SET TRACE TRAP 

;;JUHP TO START OF TEST 

; .-RETURN— THIS IS CHANGED TO 

;;AN "RTT" IF "RJV IS A LEGAL 

;; INSTRUCTION 

;; RE TURN 

::NULL CHARACTER STRING 



L 



CtCKIBDO 11 /4A MEM MGMT 
SYMBOL TABLE 

ABASE = 000000 
ACDWl = 000000 
ACDW2 = 000000 
ACPUOP= 000000 
ACSMPS 035334 
ACSMSP 035336 
AODWO = 000000 
ADDWl = 000000 
ADDW10= 000000 
ADDy11= 000000 
ADDWl 2= 000000 
ADDWl 3= 000000 
ADOWU= 000000 
ADDWl 5= 000000 
ADDU2 = 000000 
ADDU3 = 000000 
ADDW4 = 000000 
ADDU5 = 000000 
ADDU6 = 000000 
ADDW7 = 000000 
AD0W8 = 000000 
ADDW9 = 000000 
ADEVCT= 000000 
ADEVM = 000000 
AENV = 000000 
AENVM = 000000 
AFATAL= 000000 
A«ADR1= 000000 
AMADR2= 000000 
A«ADR3= 000000 
AnADR4= 000000 
AMAMSU 000000 
AnAMS2= 000000 
AMAMS3= 000000 
AMA«SA= 000000 
AMSGAD= 000000 
AMSGLG= 000000 
AMS6TY= 000000 
AMTYP1= 000000 
AMTYP2= 000000 
AMTYP3= 000000 
AMTYPA= 000000 
APASS = 000000 
APR INI 002060 
APRIOR= 000000 
APTCSU= 000040 
APTEWV= 000001 
APTSI2= 000200 
APTSPO= 000100 
ASWREG= 000000 
ATESTN= 000000 
AUNIT = 000000 
AUSWR = 000000 
AVECT1= 000000 
AVECT2= 000000 
BADPC 001304 
BITO = 000001 
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BITOO = 


A A A A A 1 

000001 


DH14 


A ^ 7 / T 

0l3?42 


BJT01 = 


A A A A A 

000002 


DHl 5 


013322 


BIT02 = 


A A AAA / 

000004 


DH16 


01336c 


BJT03 = 


A A A A i A 

000010 


DHl f 


A 1 7/ / "5 

01 34^c 


BJT04 = 


A AAA ^ A 

000020 


DH2 


A1 07C O 

012/^52 


BJT05 = 


AAAA/ A 

000040 


A IJ ^ A 

DH20 


A1 7C00 

013522 


BIT06 = 


A A A ^ A A 

000100 


DH21 


Ai TC^ ^ 

013562 


BIT07 = 


AAA ^ A A 

000200 


DH22 


A i T 1.77 

01367/ 


BIT08 = 


AAA/ AA 

000400 




A1 'Z7T7 
0\3f 5/ 


BIT09 - 


AA^ AAA 

001000 


r\tj 1^ 

DH26 


AI 7*777 


Bill = 


AAA A A^ 

000002 


Dndf 


Ai / 1 1 1 

0141 1 1 


BITiO = 


AA 1 AA A 

002000 


A 1 1 7 A 

DH30 


A i / 7 A^ 

014306 


BIlM = 


AA/ AAA 


DH32 


A1 / 7^0 

014362 


BIT12 = 


A^ AAAA 

010000 


DH33 


A1 / / AI 

01 4401 


BI 1 13 = 


A T AAA A 

020000 


DH34 


01 4441 


BIT14 - 


A/ AAAA 


DH36 


A1 / C70 

01453c 


Bin? = 


1 AAAArt 

1 00000 


Dnjf 


A1 / C70 

0145/c 


BI T2 = 


AAAAA/ 

000004 


DH40 


A1 / / 7^ 

01463c 


BI Ti = 


AAAA1 A 
000010 


r\u/ 1 
Dn«»l 


A1 / 7A7 

014/03 


BI T4 = 


AAAAOA 

000020 


DH42 


A1 C AA7 

01 500r 


81 T5 = 


AAAA/ A 

000U40 


DH43 


A 1 CA/ 7 

01504r 


BI T6 = 


AAA1 AA 
0001 00 


r\u/ / 


A1 CI 1 7 

01 51 1 r 


BI Tr 


AAATAA 

OOO^rOO 




A1 Ci C7 

01515/ 


BI To 


AAA/ AA 

00U4O0 


DH55 


A1 C0A7 

01 5cUr 


D 1 TO — 

81 1 V 


AAI AAA 

UU 1 OUU 


DM5 / 


01 5c*»0 


BPTvcC- 


AAAA1 / 
000014 


DISPLA 


AA1 1/0 

001 1 HC 


rvCLjD — 
CKSwN - 


1 A/ / 1 A 

1 04*1 1 0 


DJSPnfc 


AArtI 7Z 

0001 r H 


CMSG 


OOjjO 1 


r\ALJCI D 

DQWcLP 


A7C71 1. 

035316 


CNTRLC 


AAC7A^ 

OOjjO^ 


D5WR = 


1 77C7A 


CPSAvc 


AATOiCA 

003^00 


D 1 1 


A1 C7AC 

015306 


CPUtnH- 


\ f f fob 


r\Tl A 

DTIO 


A1 C7/ / 

01534<( 


CR 


AAAAI C 
00UU1 3 


Dl It 


U15356 


TBI r 

CRLr = 


000200 


DT13 


Ai C77/ 


CSnlNS 


A T C 7Z L 


r\Tl / 
DT14 


A1 C/ 1 O 

01541c 


CSMSUo 


A7/ C7A 

034330 


DT15 


A1 C / 7A 

015430 


f CiiA 

CSMU = 


AA7AAA 
00/000 


DTlo 


A1 C/ / O 

01544<f 


r cMl — 


AA7ni A 

00/010 


r\T 1 7 


Ai c/ cn 
015460 


r CMl C T 

CSM 1 b 1 




D 1 ^ 


A1 C77/ 

0153c4 


r CMO — 


AA7A0A 
00/0^0 


r\ T OA 
D 1 ^0 


AI C/ 7 A 

0154/6 




A7C77A 

OjjjjO 


DT^l 


AI CC1 A 

015510 


r cmT — 


AA7A7rt 
00/030 


f\TOO 


0155c6 


r cM7Dr\ 

CSMjHD 


Ojjjjc 


DT<:«( 


A1 CC/ A 

015540 


r CM/ — 


AA7A/ A 

00r^040 


DT<:o 


A1 CCCO 

015552 


r CMC 

CSM3 


AA7ACA 

00/050 


r\ T l7 


A1 CC7A 

0155^0 


{.bno 


AA7A<.n 

OO/OoO 


u 130 


AI CAAX 

015606 


r CM7 — 




D 13c 


AI CiLOn 

0156c0 


t\t\ T CD 

DDI or - 


1 77C7n 


DT34 


U15oc6 


Or 1 


016034 


DT36 


015642 


rvt 1 "3 


A1 itrtC7 

0 lOOjf 


r\ T/ A 
DT^O 


AI CZ.C/ 

015654 


r\c 
Dfc 


A1 ^ A/ 1 

0 10041 


IN T/ 1 

DT41 


015664 


Of 5 


A1 ^ ACA 

016050 


r\ T/ o 


AI c7aa 
015/00 


Dr JC 


A1 ^A^ C 

016065 


DT43 


AI C71 1 

015/ 1 2 


ur J 


v 1 OUJH 




U 1 J f CO 


DH1 


012672 


DT46 


015742 


DH10 


013042 


DT47 


015754 


DH12 


013102 


DT50 


015766 


DH13 


013162 


DT52 


016000 



SEQUENCE 146 



K T C C 

DT55 


A 4 ^ A ^ A 

016010 


KDPAR3= 


1 72366 


l\ T C 7 

DT57 


Ai Z ATi 

016022 


KDPAR4= 


1 72370 


EMTVEC= 


AAAA7A 

000030 


KDPAR5= 


1 7 O 7 7 

1 72172 


EMI 


AA7 C T 

007522 


ICDPAR6= 


1 7^77/ 


CMl A 

EMI 0 


AA7Z 7 1 

007631 


KDPAR7= 


i 7 0 77Z. 


rMi 1 

EMI 1 


AA77A i 

007701 


1^ rv rv ft A 

KDPDRO= 


i 7 07 T A 

172320 


CMl O 

EMI 2 


AA77C A 

007750 


KDPDR1= 


172322 


rMi 7 

EMI 3 


A i AA 1 "5 

010022 


KDPDR2= 


1 7 07 O / 


r Mi / 

EMI 4 


Ai AA77 

010073 


KDPDR3= 


i 70 70^ 

1 72326 


rMi c 

EM15 


Ai Ai C/ 

0101 54 


w A n A n / ~ 

KDPDR4= 


i 70 77 A 

1 72330 


rMi L. 

EM16 


Ai A077 

010c3r 


KDPDR5= 


1 72552 


CMO 

EM2 


007562 


t(DPDR6= 


i 7077 / 

1 72334 


CMO 1 

cMcl 


AI n7i c 

010315 




i 7'577z 
1 f255t 


EM22 


Ai A7Z0 

010362 




A A i i AA 

0011 00 


CM^7 

cM23 


Ai A/ 7i 

01 0431 


KIPARO= 


i 7^7/ A 

1 72340 


cMc4 


Ai A/ Z/ 

01 0464 


K I PAR 1 = 


i 707/ O 

1 725^2 


cmoc 
cM25 


AI AC 07 

0105c3 


KiPAR2= 


1 707/ / 
1 7cjH*t 


cMc6 


AI AC7n 

0105f 0 


KIPA13= 


i 707/ Z 

1 72346 


cM2f 


Ai AZ7Z 

01 0636 


1/ f n A A / • 

KIPAR4= 


i 707CA 

1 7c350 


CM7A 

cM30 


Ai A7i 7 

010713 


t A A A C 

KIPAR5= 


1 707C 0 

1 f25b2 


rM7i 

cM31 


Ai A7CZ 

010756 


KIPAR6= 


i 707C / 

1 72354 


CM77 

cM3c 


Ai i AOi 

01 1 021 


T n A A 7k 

K I PAR 7= 


1 707CZ 

1 72356 


CM77 

cM33 


Ai 1 AC7 

011057 


K JPDRU= 


i 707AA 

1 72300 


CM7/ 

cM34 


A1 1 1 7C 

01 1 1 35 


V T Dr\D 1 — 

K IrDR 1 = 


1 707A0 

1 f 25\}d 


CM7C 

cM35 


Ai i Oi Z 

01 lcl6 


fc* T DAD Ok 

KIPDR^= 


1 707A/ 
1 f25\J't 


tH36 


A1 1 OCO 

01 lc5c 


^ r DAD 7k 


1 707AZ 

1 7 C306 


C1I77 


AI 1 707 

01 1327 


^ f DAD/ K 


1 7071 A 

1 7c310 


cM^O 


AI 1 770 


V- T DAD Ck 


1 7071 0 

1 f c5\2 


CM/ 1 

tM41 


AI 1 / C7 

01 Ih57 


^ T D ADX K 

KIPDR6- 


1 7071 / 

1 f 25\H 


CM/ O 

EM42 


Ai i C07 

01 1 5c3 


KIPDR7= 


i 7071 Z 

1 72316 


CM/ 7 

cM43 


01 1566 


VCD — 


If AAAAAZ 
1000006 


CM/ / 


AI 1iC77 

U1 1633 


1 c * 


AAAA1 O 
00001 C 


CMZ C 


A1 1 7A1 

01 1 701 


LOOP 


AOACiLA 

0c0560 


cn*6 


AI 1 7/ A 

01 1 7«»0 


MCDm f\ 

MrPDLD 


AA7AA/ 

003004 


CMZ 7 

CM4/ 


AI OAAO 

OlcOOc 


Mr A A 1 D 

MFPDLP 


AA0'77A 

0027 70 


CMCA 

cM50 


AI OA/ 1 

01c041 


Mr Dr\DC 
MFPDPS 


AA0770 

00c77c 


tM51 


A1 on7A 
01 c070 


MC Dr\ T c 

Mr PD 1 5 


AA07/ Z 

00c7<»6 




Ai 01 OA 

0 1 cl c6 


MC Dr\wr 


AA7A/ A 

003040 


CMC7 

tW53 


ni 51 QO 
01cl5c 


MC Dr\\/l 


A77CZZ 

03356h 


CMCZ 


AI 001 7 

Olccl 7 


MC D T 1 r\ 

Mr Pi LD 


AA0C70 

00c53c 


tM55 


AI 00Z.7 

01cc63 


Mt D T 1 D 

Mr Pi LP 


AA0C1Z 

00c516 


cM56 


AI 0707 

01c3c7 


MC D T DC 

MrPIPb 


AAOCOA 

00c5c0 


CMC7 


AI 0/ i 7 

01c413 


Mr D T T C 

MFPI TS 


AAO/ Z/ 

002464 


cmCD 

EM5o 


Ai 0/ ZZ 

01c466 


MC D T i/r 

Mf Pi VC 


AAOZ O O 

002622 


CDI AID 

cRLOOr 


AAOZO/ 

00c6c4 


MC D f \/1 

MrPI vl 


A07CZZ 

0c7566 


CDDDCD 


AAO/ / / 

00c4«»«» 


MC D T 1/ 0 

MrPi Vc 


A7A1 ZZ 

030164 


CDDOD — 


1 A/ AAA 

1 04000 


MC D T \/7 

MrPI V3 


A71 Z7/ 

03167* 


CDD T VD 


AAYiCCA 

003650 


MC D T \li 

MrPi V4 


A707A/ 

03c 304 


CDDt/C t — . 

cRRVcC- 


AAAAA/ 

000004 


MC D T \/C 

MrPI V5 


A70CZ0 

03c56c 


^TCIlD 

GTSWR = 


1 A/ / r\7 
1 04h07 


MC D T llZ 

MrPI V6 


A7/ A7Z 

034036 


LIT 

H 1 = 


AAAA1 1 

00001 1 


M/^MCDD 

HGMtRR 


Ai Z 1 / O 

0161 4c 


T DC A l/C 

IBSAVfc 


AA7Z/ Z 

003646 


M/'MC 1 r 

MGMrLo 


Ai Z i / / 

01614*» 


TMf T 


uCvOOO 




If 1 J f c 


IOTVEC= 


000020 


MMR1 = 


^77S7^, 


KDPARO= 


172360 


MMR2 = 


177576 


KDPAR1= 


172362 


MMR3 = 


172516 


KDPAR2= 


172364 


MHVEC = 


000250 



t 
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S^nBOL 


TABLE 


















mtpild 


Art '1 ^ "7^ 


SDPDRO= 


1 7000A 

1 72220 


5W5 = 


AAAA/ A 
00004 U 


TtPDS = 


1 A/ /.AC 

1 04405 


ft r V c ljO 

>CK5UR 


AAZ 7AA 

004306 


HTPILP 


AAI^ C / 

002654 


SDFDR1= 


1 70 O O O 

1 fcccc 


swo 


AAAI AA 
000 100 


T rPc = 


1 A/ / AI 

1 U4401 


ft n D T 


A7A O/ 0 

036242 


MTPIPH 


AA"^ ^ C Z 

002656 


SDPDR2= 


1 7000/ 


C 1 |7 _ 

SW7 = 


AAAOAA 
000200 


T W A A r — 

TYPOC = 


1 A/ / AO 

1 04402 


ft CMT A r 

»CWT AC 


AAI 1 AA 
001 100 


M T n t T A 

HTPI TA 


AAT 7 A 

002720 


SDPDR3= 


1 7000Z 

1 iddcb 


Ci iD — 


AAA/ AA 

0004U0 


1 TrUN = 


1 A/ / A/ 


ft TAil — 


AAAAAA 
000006 


M T n t TP 

HTPI TS 


AATZ 

002626 


SDPDR4= 


1 70 O 7 A 


SUV = 


AAI AAA 
00 1 000 


TVOAC — 


1 A/ / A7 

1 04*»03 


ft rM"^ * 


AAAA1 / 
000014 


HTPI vC 


AA*^ 7/ / 

002744 


SDrDR5= 


1 70O70 

1 (ccic 


TO T T — 

TBI 1 


AAAAOA 
000020 


1 I^D A A A — 

UDPARO- 


1 77AAA 

1 7 r660 


ft TMT - 


AAAAAA 
000006 


niPI vl 


030614 


SDPDR6= 


1 7007/ 

1 72234 


TO T T DC 

TBI 1 rS 


AAI 07/ 
001 C> 4 




1 77AA0 

1 7 r662 


ft " M/ — 


AAAr AA 

000106 


MT n T If*) 

HTPi 


AT i 1Z A 

031 260 


SDPDR7= 


1 70 07^ 

1 icc5b 


TO T T WC — 

TBI T Vt- 


AAAA1 / 

000014 


1 mo AD 0~ 


1 77AA/ 


ft r AiTt r 


AA1 7 1 O 

001312 


U T n T I f T 

nlPI v3 


033022 


SIPARO= 


1 70oy A 


TC C TUA 

TcSTNO 


AA1 OC/ 

001 254 


1 I^D AO 7~ 


1 77AAA 

1 7 r666 


ft r AI T 1 ^ 


AAC OC 7 

005253 


MT n I If/ 

HTPIV»» 


033242 


SI PARI = 


1 700y o 
1 (ccUd 


T T AiCOD 


A1 iLA7A 
01 6U7U 


1 lf\D A D/ ~ 


1 77A7A 

1 7 r670 


ft r AiT 1 II 


AAC 0/ A 

005246 


NDFLAG 


AA"^ 1 1 

0022W 


SJPAR2= 


1 70 O/ / 

1 72244 


T T Air 1 

T JMPLG 


A1 ilA70 

01 6072 


1 lf\D AD C — 

UDPAR^= 


1 77A70 
\7 7b7d 


ft r Al lA A 

•CPUOP 


AAI OC 0 

001252 


NOD SPA 


002232 


r T A A n 7 — 

SIPAR3= 


i 70O/ Z 

1 f dcUb 


Ti/\/cr — 
TKvcC - 


AAAAAA 
000060 


1 lf\D ADiC * 

UDPARo= 


1 77A7/ 

1 r ^ 67*» 


ft roi r 

JCRLr 


AA 1 0 O 1 

001 221 


PATCH 


Ai A TT'^ 

016232 


5 JPARh= 


i 700CA 

1 fcdjU 


T AC C 

1 Or r 


002356 


1 ir\DAD7— 


I 77A7A 
1 7 Ibfb 


ft f\OI u 


AAA 7A O 

006762 


P8AHI 


AAi TAT 

001 302 


C T n A A C 

SIPAR5= 


1 700CO 

1 rddjd 


T AAI 

TON 


rtrtO/ 1 0 

0024 1 2 


1 if\Dr\DA— 
UDPDHU= 


1 77A0ft 

1 7 7620 


ft f\0 OA 


AA7AAA 
007066 


PBALO 


AAi Tf\/\ 

001 300 


SIPAR6= 


1 70 OC/ 

1 7 2254 


TPVcC - 


A AAAA/ 

000064 


1 mDr\D 1 — 
UDPDR 1 = 


1 77AO0 

1 7 r622 


ft A C l/C T 


AAI 07/ 

001 234 


PCSWS 


A7C T*^A 

035320 


C 1 A A A 7 V 

S1PAR7= 


1 700C^ 

1 fdd^b 


TO ADO r 

TRAPPC 


AA1 OAA 

001260 


1 IfXD^D 

Ul>PDR£= 


1 7 7bdH 


ftf\AA^AI 

SDOAGN 


A7A OA O 

036262 


PCSnRO 


035324 


C T AA A A V 

SlPDRO= 


i 70OAA 

1 7 2200 


TO ADDC 

TRAPPb 


AAI OAO 

001262 


1 iADAD7 — 

UPPPRj- 


1 77A0A 
1 7 7bdb 


ftl\TDI 


AAA 7C O 

006752 


CMC B 

PCSnSr 


035322 


5iPDRl= 


1 700AO 
1 (cede 


TO AQl/C* 

TRAPVc= 


AAAA 7/ 

000034 


UPPPR^= 


1 7 ro30 


ftCAin Al\ 


ATAOCO 

036252 


Pr cCDF 


AA/ TAO 

004302 


C T A A A ^ _ 

SJPDR2= 


1 70OAy 


TO T \/c r * 

TRTVcC= 


AAAA1 / 

000014 


1 iadadC* 

UPPPR5= 


1 77A70 

1 7 7632 


ftCAIf\r T 

•cNDCT 


A7A AC/ 

036054 


fir c riMj 
Pr cCOH 


A A/ 0/0 

004242 


c f or\o 7— 
5IPDR3- 


1 7 0 0AiL 

1 7 2206 


T C T 1 

T5T1 


A0A7A/. 

020704 


1 lADADiL.-* 

UPPPKo= 


1 77A7/ 

1 7 r634 


ftCAU II 1 


A7A70/ 

036324 


PrcCDT 


AA/ 

004272 


SJPDR4= 


1 7001 A 
1 fdd\\) 


T C T 1 A 

TST 10 


A071 AA 

023160 


1 ir\DnD7w 


1 77A7A 

1 7 7636 


ftCAIli 


AAI 0/ / 

001244 


or c ^ CM 


AA/ OAO 

004202 


P T An A C — 

5IPDR5= 


i 7001 0 
1 1 dd\d 


T C T 1 1 

TST 1 1 


A07/ AO 

023462 


1 1 T D ADA — 

UJPARU= 


1 77A/ A 

1 7 ^640 




AAI O/ C 

001245 


PrtCWS 


A A/ 1 70 

004 172 


r T Ah AX — 

SIPDR6- 


1 7001 / 
1 fdd\'* 


T C T 1 0 

T5 1 1 2 


A07C C 0 

023 j5 2 


1 1 T D AD i — 

UJPAR 1= 


1 77A/ 0 

1 7 f 642 


ft C AD 

»cOP 


A7AAO/ 

036024 


PIRQ = 


\7( ( f C 




1 7001 Z 

1 7dd\b 


T r T 1 7 

TST13 


A077/ 0 

023742 


1 1 T A A A O — 

U1PAR2- 


1 77A/ / 

1 7 7644 


ft C A A F- T 

JEOPCT 


A7AA/ A 

036046 


PlKQvE= 


000240 


SRO = 


1 77C70 

\7 7^7d 


T C T 1 / 

T5T14 


AO/ OCA 

024256 


1 1 T Q A07~ 

UJPAR3- 


1 77A/ A 

1 77646 


ft c Dr 1 /" 

»cRr LG 


AAI 1 A7 

001 103 


PRO = 


AAAAAA 
000000 


col _ 

5R 1 = 


1 77C7/ 

1 775 74 


TCT1 C 

1 ol 1 5 


A0C07/ 

025234 


1 1 T D AO/ — 

UJPAR4- 


1 77ACA 

1 7 ^650 


ft CDMA W 


AAI 1 1 C 

001 115 


PR 1 = 


000040 


CDO — 

SR2 


1 77C7it 

1 7r 570 


T C T 1 


AOA070 

026272 


UirAR5- 


1 77AC0 

1 7 7652 


ftCDOAD 

•CRROR 


AA707A 

003270 


PR<: = 


AAA1 AA 
000100 


SR3 = 


172516 


T C Tl 7 

TST 1 r 


AOAC/ 0 

026542 


1 1 TOAOA* 

UiPAR6- 


1 77AC/ 

1 7 7654 


ftCDDor 

JcRRPC 


AA 1 1 1 A 
001 116 


no T 

PR3 = 


AAAi / A 
000140 


SSP =1000006 


T C T 0 

TS 1 2 


A01 000 

021222 


1 1 T O AQ7~ 

UJPAR7 - 


1 77ACA 

1 7 r656 


ftCDDTO 

IcRR IB 


AAI 70A 

G01320 


PRh = 


AAAOAA 
000200 


STACK = 


001100 


T C T OA 

IS 120 


A07A1 A 

027016 


UJrDRO= 


1 77AAA 
1 7 7600 


ftCOTTI 

»tR 1 1 L 


AA1 110 

001 112 


PR5 


AAAO/ A 

000240 


START 


020000 


TC T Ol 

TST21 


A07O70 
\JC7dbd 


uIPDRl= 


1 77AAO 

1 7 7602 


ft f C ^ A A 

•cSCAP 


AAI Ol O 

001212 


PRo = 


0U0300 


STKLMT= 




tctoo 
1 S 1 22 


A07A7/ 

02 7 o34 


1 1 T OADO* 

UJPDRc- 


1 77AA/ 

1 7 7604 


ftC T AOl 


AAI 0/ / 

001244 


PRr 


AAA7/ A 

000340 


SUPERH 


035340 


T C T 07 

T5T2i 


030232 


1 1 T nAA7a> 

UjPDR3= 


1 77AAA 

1 77606 


ft C TCAIA 


AAI OC/ 

001254 


PS = 




SUPSTK= 


000700 


T C T 0/ 

T5T24 


A7AAA0 

030662 


1 If DAD/ 


1 77A 1 A 

1 7761 0 


ft C A T At 

IrATAL 


AAI OOA 

001226 


P5W = 


1 7777it 


SUR 


001 UO 


TCTOC 

T5T25 


A71 70A 

031326 


1 1 T Df\DC — 


1 77A1 0 

1 7761 2 


ft C C 1 

»r r LG 


AAAO/ 0 

006242 


PWRnSG 


AA7/ XA 

007460 


SUREG 


000176 


T C T 0^ 

TS 126 


A7 1 7/ 0 

031 742 


1 1 T onD^ — 

UJPDRo- 


1 77A1 / 

1 7 r 61 4 


ftc f 1 1 r 
>r ILLC 


AAI 1 CA 

001 1 56 


PWRvcC 


AAAAO/ 

000024 


SWO = 


000001 


T e T 07 


A707C 0 

032352 


UiPDRf = 


1 77A1 A 

1 77616 


ft C 1 1 1 c 

»r ILLS 


AAi ICC 

001155 


RDCHR = 


i A/ / 1 1 

1 044 1 1 


SWOO = 


000001 


T C T 7 

TS 1 3 


A01 / CA 

021456 


1 ICC C Tl^ — 


AAAAAA 
000600 


ft A r\D 


AAi 1 OA 

001 120 


ROLIN = 


1 A/ / i O 

1 0441 2 


SW01 = 


000002 


T C T 7A 

TS 130 


A7 0A7A 

032636 


1 ICD — * 

U5P 


IT AAAAAA 
(000006 


ft ^r\r\ A T 
•GDDAT 


AAI 1 0/ 

001 124 


RcGCHG 


035 7 rO 


SW02 = 


000004 


TC T71 

TST31 


A77A/ 0 

033042 


1/ T D T 1 

VJR 1 1 


AAI 07A 

001276 


ftr-CT/ 0 
»GE T42 


A7A00/ 

036224 


Rc uUA I 


036000 


SU03 = 


000010 


TCT70 

1 S 1 32 


A770A0 

033262 


UA CDil 

WA5R0 


AAI OCA 

001 256 


ft ^ T C LIO 

»G 1 SUR 


AA/ 7CA 

004356 


RcuLAo 


A7C 7^/ 

035764 


sy04 = 


000020 


TCT77 

TST33 


A77770 


LI A C C D A 

WA55RU 


AAI OAZ 

001264 




AAAAAA 
000000 


RcSRtG= 


1 A/ y 1 y 
104414 


SU05 = 


000040 


T C T 7/ 

TST34 


A77A 7 

03363c 


1 1 A C CD 1 

WAS SRI 


AAI OAA 

001266 


ftu TOTC 

•HIBTS 


AAAOA/ 

000204 


RESVcC- 


A AAAI A 
00001 0 


sy06 = 


000100 


T C T 7C 

TST35 


A7/ 1 A/ 

034 1 04 


1 1 A C CD 

WASSR2 


AAI 07A 

001 270 


ft T TAIT 

>i CNT 


AAI i A/ 

001 104 


Kb 1 URN 


03534^ 


SW07 = 


000200 


TeT7iL 
1 S 1 36 


A7/ 1 7/ 

034 \ (H 


1 lA c cd7 

WASSn3 


AA1 070 

001 272 


ft r 1 1 1 ID 
•JLLUr 


AA7/ C 0 

007452 


Ro = 


(000006 


SW08 = 


000400 


T C T 77 

TSI37 


t\XI OAA 

034266 


1 lO T T — 


AAAI AA 
0001 00 


ft I AJT Ar* 


AAi 1 7C 

001 1 35 


d7 — ' 
Kl -i 


(000007 


SW09 = 


001000 


T C T / 

T5T4 


A01 A70 

021632 


ft ADTLin 

•ArTHD 


AAA OA/ 

0U0204 


ft T TCMO 


AAI 11/ 

001 114 


SAVRcu- 


1 044 1 3 


SW1 = 


000002 


T C T / A 

T5T40 


TAA 

034360 




AAAAO 0 

006022 


ci c 
•Lr 


AAI 000 

001222 


SCOPE - 


AA/>AA/ 

000004 


SWIG = 


002000 


TCT/ 1 

T5T41 


AT/ / / A 

034446 


ft A r wi 
»ATt1 


AAC77A 

0057 7b 


ftl CI ^ 

•LrLG 


AAAO/ 1 

006241 


SDPARO= 


1 700^A 

1 fccbU 


swn = 


004000 


T C T / O 

TST42 


A7C7/ / 

035344 


ft A T V7 

»ATt3 


006004 


ft 1 AAO 

SLOOP 


A7A 70A 

036320 


SOPARl - 


1 700X.0 

1 72262 


SW12 = 


010000 


T C T / 7 

TST43 


A7C/ OA 

035420 


ft A TV/ 

JATY4 


AAAA1 / 

006014 


ft 1 DA r\D 

•LPADR 


AAi i AA 

001 106 


c An 

SOPAR^= 


1 700it/ 

1 72264 


SW13 = 


020000 


TCT// 

TST44 


A7C/ 7/ 

035474 


ft AI IT AO 

>AUTOo 


AAI 17/ 

001 134 


ftl OCDD 

•LPERR 


AAI 1 1 A 

001 110 


SDPARo- 


1 72266 


SU14 = 


040000 


T C T/ C 

TST45 


A7CC/ 0 

035542 


ftO A A AO 


AAI 100 

001 122 


ftMA T 1 


AAi 00/ 

001224 


5DPAR*»- 


1 70070 

1 r ccfU 


SW15 = 


100000 


T C T C 

TST5 


A001 OA 

022126 


ftOAfV A T 

•BO DA 1 


AAI 1 OA 

001 126 


ftMD Af\D 

»nBADR 


itAAOAA 

000206 


5PPAR5- 


1 70570 


SW2 = 


000004 


T C T Z 

TST6 


A 0 0/ A A 

022406 


ftOC 1 1 

•BcLL 


AA1 01 Z 

001214 


ftMc 1 r 

*nT LG 


AAA 0/ A 

0U6240 




1 7??74 


SW3 = 


000010 


loir 






vvO J 1 o 




o6s?7i 

\i\JjCf 1 


S0PAR7= 




SU4 = 


000020 


TYPBN - 


104406 


SCHARC 


005772 


SnSGAD 


001240 
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WSGLG 

WSG^Y 

WSWR 

SMXCNT 

SNULL 

INUTST: 

SOCNT 

tOCTVL 

ICMOOE 

SOVER 

tPASS 

JPASTM 

tPURAD 

SPURDN 

SPWRMG 

IPURUP 



001242 

001224 

005260 

001306 

001154 

000001 

006542 

0071 70 

006544 

003252 

001232 

000212 

007434 

00727 

007430 

007346 



SOUES 

SRDCHR 

SRDLIN 

SRDS2 = 

SRECAD 

$REGO 

SREG1 

$RE62 

$REG3 

$REG4 

$REG5 

SRESRE 

SRTNAD 

SRTRN 

SSAVRE 

SSAVR6 



001220 
004630 
004760 
000010 
001160 
001162 
001164 
001166 
001170 
001172 
001174 
007030 
036322 
036316 
006772 
007456 



SSCOPE 

$SETUP= 

SSTUP = 

SSVLAD 

SSVPC = 

$SWR = 

SSUREG 

$SUR«K= 

STBIT 

STESTN 

$T<8 

$TKS 

ITMPO 

STMPI 

$T«P2 

$TMP3 



003042 
000137 
M7777 
0U3216 
000204 
173400 
001246 
000000 
001310 
001230 
001146 
001144 
001176 
001200 
001202 
001204 
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$TMP4 

$TMP5 

$TN = 

$TPB 

STPFLG 

$TPS 

STRAP 

$TRAP2 

$TRP = 

$TRPAD 

STSTM 

STSTNM 

STTYIN 

STYPBN 

STYPDS 



001206 
001210 
000046 
001152 
001157 
001150 
007206 
007230 
000015 
007242 
000210 
001102 
005236 
006244 
006546 



STVPE 

STYPEC 

STYPEX 

ITYPOC 

STYPON 

$ TYPOS 

SUNIT 

SUNITM 

SUSUR 

SXOFF = 

SXON = 

SXTSTR 

$$6ET4= 

SOFILL 

.$X - 



005432 
005644 
005774 
006344 
006360 
006320 
001236 
000214 
001250 
000023 
000021 
003054 
000001 
006543 
000204 
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^REF 


VUl 






v/AI 1 IP 


REFERENCES 














- nnoono 


















= OOflOOO 

" vVA/vvv 


CV 1 CST 
















- onnnnn 


£\J- 1 C'«T 
















= 000000 


CU~ 1 C«tT 


50-1 5Z.0 

CV • 7 










\ 

( 




\JjJJJ*i 


5s cUc ' 
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•105-4438 
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• 1 OC-AA 5/\ 


105-4467 


m^ OC 


— Z, C04s 


IF 

9 ^ 


Annuo 


= 000000 


















- OOOOOfi 
















Annul 0 


- nooooo 


50-1 5Z.0 














Annul 1 


- 000000 


50-1 5/.0 












If 


Annul ? 


- 000000 


50-1 5Z.0 














Annul 


- 000000 


50—1 5Z.0 












•r 


Annul ^ 


- nooooo 


50-1 5iO 












Cl 
•r 


Annul s 


= 000000 


50-1 5Z.0 












11 
• 1 


AnnuP 


- 000000 


50-1 5Z.O 












11 
• 1 


Annu*^ 


- 000000 


50-1 5A0 












11 


AnnuA 


- 000000 


50-1 540 
cU 1 CST 












11 


Annus 


- 000000 


50-1 540 

CU 1 CM T 












ll 


AnnuA 


- 000000 


50-1 ?40 

CU 1 CHT 














Annu7 


- onoooo 


50-1 540 












CI 
*L 


Annufi 


= 000000 

vvvvvw 


?0-1 540 












CI 

9L 


Annuo 


= 000000 


50-1 540 

CU 1 CS T 














ADFwr T 


= 000000 

*" vvvvvw 


50-1 ?40 
cU 1 CS T 


50-1 5A0 














- 000000 

vvvvvv 


50-1 540 

CU 1 CM T 
















= 000000 

vvvvvv 


50-1 5A0 


50-1 540 














= 000000 

vvvvvv 


50-1 ?40 

CU 1 CS 7 


50-1 540 

CV 1 CS T 












AT ATAl 


- 000000 

Uvvvvv 


50-1 540 

CV 1 CH7 


50-1 540 
cU— 1 cs y 












AMAnPl 


- 000000 

UvvvvU 


50-1 ?40 

CV 1 CS 7 














AMAnPP 


- 000000 

UvvvvU 


50-1 ?40 

CV 1 CH 7 














AMAnP^ 


- 000000 


?0-1 ?40 

CV 1 C** 7 














AMAnPA 


- 000000 


?0-1 540 

CU 1 C S 7 












IM 




- 000000 


?0-1 ?40 

cU 1 C** 7 
















- 000000 


?0-1 540 

CU 1 C S 7 












IM 




= 000000 

UvvvUv 


50-1 540 

CV 1 CS7 
















r 000000 
uuuuuu 


50-1 ?40 
cU 1 CS 7 
















- 000000 

UvvUvU 


50-1 540 
cU 1 c** T 


50-1 540 

C U 1 Ct 7 












'VI JUL VJ 


- 000000 

vvvvvv 


50-1 540 

C U 1 CS 7 


50-1 540 

CU 1 CS7 
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- 000000 


50-1 ?40 

cU 1 CS 7 


50-1 540 
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000000 

VVVVV\J 


50-1 540 

CV 1 C** 7 














AMT VP? 


- 000000 

UvvUvv 


50-1 540 

cU 1 C*l 7 












■ 


AMT VP ^ 


000000 

vvvvvv 


50-1 540 

CU 1 C** 7 














AMT VP^ 


r 000000 

Uvvvvv 


50-1 540 

CV 1 C** 7 














APA<;<; 


- 000000 


50-1 540 

CV 1 C** 7 


50-1 540 

CU 1 C S 7 
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79 


-3360 


1 oz. 


-A TO/ 




APR I OR 


- 000000 
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APTf 

Mr 1 L 


- 000040 


4^-1 00^ 
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_ 000001 
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APT^pn 
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«44 
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= 000000 


20-1249 


20-1249 












AUNIT 


= 000000 


20-1249 


20-1249 













H 12 







CREATED BY 


IHACRO ON 12-JAN-82 AT 


12:24 


PAGE 2 








SEQUENCE 150 




CROSS RETERENfE 








ChcF VOl 


SYMBOL 


VALUE 


REFERENCES 


20-1249 






AUSWR 


- 


000000 


20-1249 






AVECT1 


= 


000000 


20-1249 








AVECT2 


= 


000000 


20-1249 


•28-1591 


54-2023 




BADPC 




001 304 


#20-1249 


98-4244 


BITO 


= 


000001 


#15-1197 


93-4084 


93-4121 


BITOO 


r 


000001 


#15-1 197 


15-1197 


36-1785 


i 70 C 

36-1 785 




105-4472 


105-4478 


105-4485 




BI T01 


= 


000002 


#15-1197 


15-1197 






BIT02 


= 


000004 


#15-1197 


15-1197 






6IT03 




000010 


#15-1197 


15-1197 






BI TOA 


r 


000020 


#15-1 197 


15-1197 






BI T05 




000040 


#15-1197 


15-1197 






B1T06 


= 


000100 


#15-1197 


15-1197 






BIT07 


= 


000200 


#15-1197 


15-1197 


36-1 785 




BIT08 


= 


000400 


#15-1197 


15-1197 


77 i 707 

37-1 787 


BIT09 




001000 


#15-1197 


15-1197 


36-1785 


BIT1 


= 


000002 


#15-1197 


89-3971 


89-4004 


n4 / A7y 

91-4034 


BIT10 




002000 


#15-1197 


37-1787 






BITl 1 




004000 


#15-1197 


110-4609 






BIT12 




010000 


#15-1197 






BIT13 


= 


020000 


#15-1197 


37-1787 


105-4436 


4 AP / i C4 

105-4451 


BI TU 




040000 


#15-1 197 


36-1785 


BIT15 




100000 


#15-1197 


105-4452 


28-1606 


77-3312 


BIT2 




000004 


#15-1 197 


28-1582 


BI T3 


- 


000010 


#15-1197 


103-4370 


58-2125 




BI T4 




000020 


#15-1197 


15-1208 




BIT5 




000040 


#15-1197 


15-1209 






BI T6 




000100 


#15-1 197 






BI T7 




000200 


#15-1197 








n t T O 

BI To 


- 


000400 


#15-1197 








BIT9 




001000 


#15-1197 








BPTVEL 


= 


000014 


#15-1197 




37-1787 


A i m A 

#50-1910 


CKSyR 


= 


104410 


36-1785 


37-1787 


CMSG 




005361 


41-1888 


#41-1899 


#41-1886 




CNTRLC 




005302 


40-1882 


40-1882 


7 7 4 70 7 

♦37-1787 


CPSAVB 




003266 


•36-1785 


36-1785 


#36-1 785 


CPUE RR 




177766 


#15-1210 


54-2003 


•56-2066 




CR 




00001 5 


#15-1197 


43-1903 


43-1903 




CRLF 




000200 


#15-1197 


43-1903 


i 7 4 A A 7 

43-1903 


r* ^ ^ A C 7 

52-1957 




53-1981 


53-1982 


53-1984 


53-1992 


CSMINS 




035744 


109-4571 


#109-4603 


4 A y y C ^7 

106-4523 


4 A7 / c y 1 

107-4541 


CSMSU8 




034530 


104-4399 


#105-4405 


CSMO 




007000 


#15-1 185 


100-4306 


101-4329 


102-4352 


CSM1 




007010 


#15-1186 


109-4603 


4 A P / i 77 

105-4473 


#105-4502 


C SMI ST 




035326 


54-2028 


♦105-4427 


CSM2 




007020 


#15-1187 


109-4603 




Ml AC y CAT 

#105-4503 


CSM2ND 




035330 


54-2029 


•105-4428 


4 AP / / 7n 

105-4479 


CSM3 




007030 


#i5-1188 


109-4603 






CSM3RD 




035332 


54-2030 


•105-4429 




CSM4 




007040 


#1 J- 1 loV 












007050 


#15-1190 


109-4603 






CSH6 




007060 


#15-1191 


109-4603 







98-4277 
37-1787 



37-1787 105-4443 105-4454 105-4466 



105-4493 
91-4071 



106-4520 
77-3320 



96-4180 96-4212 



37-1787 39-1880 



52-1958 
58-2107 

108-4558 
103-4375 



53-1973 
58-2107 



105-4417 



53-1977 53-1979 



53-1980 



CKKTBO 



CREATED BY MACRO ON AT 



SYMBOL CROSS REPEREMCE 



12:24 PAGE 3 
SEQUENCE 151 

CREF VOI 



I 12 



SYMBOL 


VALUE 


REFERENCES 


109-4603 




LSM7 


= 007070 


#15-1192 


30-2106 


DO ISP 


= 177570 


#15-1197 


1A 1 iy o 

20-1249 


DF1 


01603A 


23-1392 


iy 1 y 11 

24-1422 


1/ 1 y 7y 
24-1434 




M r C ^ A 7 c 

#55-2035 




21-1284 


DF12 


016057 


21-1254 

mC C ^ A 7 n 

#55-2039 


21-1278 


OF 2 


016041 


21-1 260 


iy 1 y c 7 
24-l<i53 


«CC_3A7y^ 

#55-2U5o 


OF 3 


016050 


21-1266 


11 1171 

21-12/2 


11 1 3QC 

22-1295 


23-1386 

AtC C A77 

#55-2037 


iy 1 y A7 
24-1403 


1/ izno 
24-1 AUV 


DF32 


016065 


^ 7 1 7 OA 

23-1380 


17 1 700 

23-1370 


*c C 1 Ay A 

#55-2040 


OF 5 


016054 


17 1 7y 7 

23-1343 


ly 1 y 1 c 
24-141 5 


3C_1 / Q7 

23-1 *»y/ 


DH1 


A1 71 

012672 


11 1 1C1 

21-1252 


»C7 10^7 

#53-1 963 




OHIO 


n ^ Tn/ 1 

01 3042 


21-1264 


11 1 i7n 
21-12/U 


«C 7_ 1 QAC 

#5j- 1 y65 




01 3102 


11 1 17^ 

21-12/6 


«C 7 1 

#53-iy66 




DH1 3 


013162 


11 1 101 

21-1 282 


«C 7_1 Q^7 

#53-1 y6/ 




DHIA 


013242 


11 1 1 o o 

21-1288 


«C7 lO^O 

#53-iy6o 




DHl 5 


013522 


11 1 1Q7 

22-1293 


«C7 1 QitO 

#53-1 y6y 




DHl 6 


A^ TT^ 1 

013362 


11 1 10A 

22-1299 


MC7 1Q7A 

#53-19/0 




DHl I 


013442 


1 1_ 1 7AC 

22-1 305 


«C 7_1 Q71 

#53-1 y/1 




DH^ 


012^^52 


11 1 icp 

21 -1 25o 


#53-1 y6H 


37-1 tL 1 

23-1 3h1 


DH20 


01 3522 


11 1711 

22-1311 


11 1 77n 

22-1 33U 


DH^ 1 


A1 7C ^ 1 

01 3362 


11 1717 

22-131 f 


«C7_1 Q77 

#53-1 y/3 




vnlc 


A1 77 

01 36^/^ 


11 1 7iy 
22-1324 


#C 7_1 Q7C 

#53-1 y/5 




0H2A 


A1 77T7 

01 373^ 


11 1 77X 

22-1336 


*C7 1Q7iL 

#53-1 y/6 




DH26 


A1 T777 


17 1 7/ 7 

23-134/ 


«C7 1Q77 

#53-1 y/ / 






014)11 


17 1 7C/ 

23- I35*t 


• C 7_1 Q7Q 

*5j-iy/y 




DH30 


A1 / 7A^ 

014306 


17 1 7A/ 

23-1 364 


■37 — 1 771 

23-13/1 


3/ —1 / 7B 

24-l*t38 


DH32 


A 1 / 7^ 1 

014362 


17 1 770 

23-1 3/0 


17 1 7Q^ 

23-1 3y6 


1/ _ 1 / C 1 

2h 1 h5 1 


0H33 


A1 / / A1 

014401 


17 1 7P/ 

23-1 304 


«C 7 — 1 QD 7 

#53-1 yo/ 




DH3*» 


Ai y / / 1 
014h«»1 


17 — 1 7Qr> 

23-1 370 


«C7— 1 QDB 

#53-iyoo 




DH36 


rt1 / C TO 

014332 


1/ 1 / A1 

24-1 •»Ui 


#33- 1 yoy 




0H37 


A1 / 07*5 

0145^2 


1/ 1 / A7 

24-140/ 


7 — 1 QQA 

#53-1 yvu 




0H40 


A1 / ^ T1 

014632 


1/ 1/17 

24-l«»13 


4*C7— 1Q01 

#53-1 yyi 




DH4 1 


A1 / 7AT 

014/03 


"i/ _1 / 1 Q 

24-i«»iy 


#53-iyy2 






AI CAA7 

01300'' 


1/ _ 1 / "iC 

24-1 •»26 


#53-1 yy^ 




DHA3 


A 1 C Ay 7 

0O04r 


"it 1/75 

24-l«»32 


iy 1 / / c 
2h-1*»*»5 


«C7— 1 QQC 

*53- 1 yy5 


nil// 


A1 CI 1 7 

01 51 1 


1C 1 / CL, 

25-1 456 


ic_ 1 / y^ 3 
25-l*(62 


3C— 1 ZBO 

25-1 Hoy 


r\ij/ C 

DHAd 


A1 C1 C 7 


«C7_1 QQ7 
#5 J 1 77/ 






0H55 


A 1 C 1A7 
01 320/ 


25-1 50/ 


#53-1 yyo 




0H57 


A 1 ciy ^ 
013246 


1^ 1 CI 1 

26-1 512 


#C7 lOOQ 

#53-1 yyy 




OISPLA 


AA 1 1 y 1 
001 142 


MlA 1 1/ Q 

#20-124y 


7A_ 1 70 C 

36-1 /05 


77—1 707 

3/-1 foi 


9\ 1 ft r> f 

OISPRt 


AAA 1 7y 
0001 '4 


#17-1246 


58-2106 




OOWELP 


035316 


«1AC //1A 

*105-4410 


1 AC y y 7 A 
105-443U 


*iAC y/yo 
•1 05-4«»h8 




«1 AC y 1 QQ 

#105-H«»yo 






DSWR 


- 177C7A 


MIC 1 1 Q7 

#1 5-1 1 y/ 


3A_1 3/ Q 

20-1 24y 


CB_31 C\L 

58-21 06 


Oil 


r 5306 


11—1 05 7 

21-1253 

til CO J 


#5h-2003 




nrin 

U 1 1 u 




31.1 371 
t 1 1 C f 1 


#^^-7005 

^ JH CVvJ 


0T12 


015356 




#54-2006 




0713 


015374 


' 21-1283 


#54-2007 




DTK 


015412 


21-1289 


#54-2008 




0T15 


015430 


22-1294 


#54-2009 





24-1447 25-1458 
21-1290 22-1301 



22-1313 
24-1428 



25-1468 
25-1495 



22-1326 
24-1441 



25-1464 
22-1307 



22-1332 
25-1491 



25-1471 
22-1320 



22-1338 
25-1509 



25-1478 
23-1 «0 



23-1367 
26-1514 



25-1485 
23-1360 



23-1374 
26-1522 



25-1503 #55-2038 



26-1520 #53-1972 



25-1475 
25-1501 



25-1482 
#53-1986 



#53-1984 



#53-1996 



•58-2106 •58-2106 



105-4491 



>.KIkTBD 

SY»«OL 

SVHBOL 

0116 

DT17 

DT2 

0T20 

0T21 

0T22 

DT24 

DT26 

0T27 

DT30 

DT32 

0T34 

DT36 

DT40 

DT41 

DT42 

0U3 

DT45 

DT46 

0TA7 

0T50 

0T52 

DT55 

DT57 

EMTVEC 

EMI 

EM10 

EM11 

E«12 

Em3 

EMU 

EHIS 

Em6 

EH2 

E«21 

EM22 

EM23 

EM24 

EM25 

E«26 

EM27 

EM30 

E«31 

E«32 

EH33 

EH34 

EW5 

E«36 

E«37 

Emo 

EM41 
En42 



CREATED BY HACAO ON 



CROSS REFERENCE 



12-JAN-82 AT 12.24 PAGE 4 
SEQUENCE 152 

CREF vol 



J 12 



REFERENCES 





oo 
2 c- 


1 7AA 
1 300 


»c/ _5ni A 
#5*»-cO 1 0 






1 7AiL 

1 30o 


•c/ -5ni 1 


01 5324 


2 1 - 


1 5CQ 

i<:5V 


*5h-cOO'« 

55-1 77l 

cc-1331 


Air / 71. 

01 54^6 


cc~ 


1715 
1 31 C 


01 5510 


CC~ 


1 7 1 Q 

I 31 7 


mK/ — 5ni 7 
/»3h cO 1 3 


A1 C CiA 

01 5526 


5 5 * 

cc- 


75C 


57-1 7ftC 

c3- 1 3o5 


01 5540 


cc- 


1 777 


5/ — 1 / flB 
£»»- 1 hOO 


A1 C C CO 

01555^ 


57—' 


1 7/ Q 


» JH cU 1 0 


A 1 C C "JA 

01 5570 


57 — 1 


7CQ 
3 JT 


«CA — 5m 7 


A1 CZ.AZ. 

0 1 56U6 


57 — 1 

£3-1 


300 


57-1 777 

c3- \jf J 


Ai c^on 
01 5o^U 


57_* 


77Q 

3f V 


57-1 707 

CJ ' jyf 


U 1 50co 


57-' 


701 


*C/-5A5A 


U 1 5o*»c 




An5 
hOc 


«c/,-5A5i 


01 5o5h 




A 1 A 


«SA-5n55 
llj't CVCC 


01 500h 


5Z-1 


A 51 


*CA-5A57 
•5h cue J 


01 5 fw 


5Z. — 1 


A57 
Her 


*c/-5A5/ 

w5h— cUcH 


015^^1^ 


5Z, — ■ 


^77 


«c/-5A5c 

W5H— cUc J 


AI 

01 5rcO 


CH- 


MHO 


WJH— CUcO 


01 *•£ 




AS? 


C 5 1 hOj 


AI C7^Z. 
0 1 J f JH 


5*;-i 

c 5 


'^1 f 


*5H— c vCO 


U 1 oo 


5^-1 


H Oh 


*SA-5n50 

w5h— c wc7 


AI iL AAA 

OloOOO 


C J- 


/.on 

H7U 


•5h— cUjU 


m i: AI A 


5^-1 
CJ 


5Uo 


*c/-5A7i 

WjH— cU5 1 




5A-1 

CO 


SI 7 

5 1 J 


* JH— CU JC 


AAAATA 

OOOOjO 


#1 


1 07 
1 7 1 


'50c 1 vO 




31-1 


5S1 
CJ 1 


*S5-1017 

99 jC 1 T 1 f 




51 -1 


5A7 
cOj 


ifS5>1010 

99 JC 1 — 1 — 


OOf f 0 1 


51-1 
C 1 


5AQ 


#';5-105fl 

*5C 1 — cU 


OOf '30 


51-1 


57'; 

CI J 


#S5-10?1 

ffJC 1 7c 1 


U 1 OOcc 


51-1 


5H1 

CO 1 


55-1 70^ 

CC 1 JUH 


0 1 OOr J 


51 -1 

C 1 


5H7 

cOi 


«S5-10?7 
njc 1 7c5 


ftl rtl 
0 1 0 1 5*1 


55-' 
t c 


505 
eye 


nJC 1 7cH 


A1 n577 
0 lOc jf 


55-' 


50R 


HJC 1 7£5 




51-1 


c5 f 


WJC 1 7 1 0 


01 03 1 5 


55-1 


71/s 
3 1 0 


HJC 1 7cO 


0 1 U jOc 


5?-' 


1 757 

5c J 


Jf';5-1057 

9fJC I 7 C ' 


0 1 Uh J 1 


55-' 
cc~ 


1 750 

JCT 


irS5-10?A 

»5c 1 7cO 


AI A/ Z/. 

01 OhOh 


55-' 


77S 
335 


•C5-1 05Q 

tfJC 1 7C7 


ni 57 

0 1 \JJCJ 


57-' 


jHU 


ifS5-107n 

nJC 1 7jU 


0 1 \Jjf\J 


57-' 


1 XLf\ 

JHO 


JfS5-1071 
9fjC 1 75 1 


0 1 00 jO 


57- 

CJ 


7«;7 

1 JJJ 


#S5-1075 

nJC 1 75c 


ni n7i t 


23-' 


1 7A7 
505 


JfS5-1077 

9fjC 1 7 J J 


0 1 jO 


57-' 

CJ 


1 77n 


i»C5-1 Q7/ 


0 1 I Oc 1 


57-' 

CJ 


1 777 

\ ji 1 


irS5-107S 
ffjc \ yjj 


0 1 1 U J f 


57- 

CJ 


1 7R7 


«S5-1 07A 

njC 1 750 


0 M 1 J J 


57- 


1 7flO 


mjc 1 7 


011216 


23- 

24-' 


395 


#52-1938 


011252 


1400 


#52-1939 


011327 


24- 


1406 


#52-1940 


011372 


24- 


1412 


#52-1941 


011457 


24- 


1418 


#52-1942 


011523 


24- 


1425 


#52-1943 



23-1342 26-1521 #54-2012 

#54-2014 
#54-2015 



24-1440 
24-1452 



25-1470 
25-1496 



#54-2018 
25-1502 



#54-2019 



#54-2027 



*58-2106 



SY1 



ST 
$T 
$T 

I.T 
ST 
IT 
»T 
ST 
ST 
ST 
ST- 
ST- 
SJ 
SUf 
SU! 
SX( 
SX( 

sx 

SS( 

so 

14 
.$ 



22-1310 #52-1922 



CKICTBD 

SVHBOL 

SvnBOL 

EM43 

En44 

EH45 

EMA6 

FMA7 

EN50 

EM51 

EM52 

EM53 

EM54 

EH55 

EH56 

E«57 

EW58 

ERLOOP 

ERPPEP 

ERROR 



CREATED BY MACRO ON 12-JAN-82 AT 



CROSS REFERENCE 
VALUE 
011566 
011633 
Oil 701 
011740 
012002 
012041 
012070 
012126 
012152 
012217 
012263 
012327 
012413 
012466 
002624 
002444 
= 104000 



ERRTYP 
ERRVEC 

GNS 



GTSUR 
HT 

IBSAVE 

INIT 

lOTVEC 

KDPARO 

(CDPARI 

K0PAR2 

KDPAR3 

KDPAR4 

KDPAR5 

KDPAR6 

KDPAR7 



003650 
= 000004 

= ****** 



104407 
000011 
003646 
020666 
000020 
' 72360 
172362 
1 72364 
172366 
172370 
172372 
mi7t, 
M217(> 



REFERENCES 
24-1431 
24-1437 

24- 1450 

25- 1455 
25-1461 
25-1467 
25-1474 
25-1481 
25-1488 
25-1494 
25-1500 

25- 1506 

26- 1511 
26-1517 

•31-1655 
#31-1654 
#15-1197 
61-2242 
64-2385 
67-2562 
71-2822 
79-3419 
81-3512 

83- 3616 

84- 3712 

85- 3812 
87-3898 
89-3994 
93-4102 
96-4210 
102-4359 
105-4490 
37-1787 

#15-1197 
*58-2117 
17-1246 
50-1910 
50-1910 
58-2108 
41-1895 
#15-1197 
•37-1787 
#58-2124 
#15-1197 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 



24-1444 
#52-1945 
#52-1946 
#52-1947 
#52-1948 
#52-1949 
#52-1950 
#52-1951 
#52-1952 
#52-1953 
#52-1954 
#52-1955 
#52-1956 
#52-1957 
•32-1676 
32-1695 
28-1599 
61-2250 
64-2392 
67-2586 
77-3326 
79-3425 
81-3520 

83- 3626 

84- 3722 

85- 3819 
87-3903 
89-4001 
93-4111 
97-4224 
103-4381 

109- 4583 
#39-1789 

36- 1785 

17-1246 
50-1910 
50-1910 

110- 4609 
#50-1910 

43-1903 

37- 1787 

•58-2106 
27-1548 



12:24 PAGE 5 
SEQUENCE 153 

CREF vol 

#52-1944 



K 12 



32- 1697 

33- 1742 
28-1601 
61-2258 
64-2406 
67-2602 
77-3330 
79-3432 
81-3526 

83- 3634 

84- 3730 

85- 3827 
87-3910 
90-4014 
93-4119 
98-4255 
105-4424 
109-4591 



#32-1704 
34-1779 
56-2064 
61-2265 
65-2445 
67-2611 

79- 3377 

80- 3443 

81- 3533 

83- 3643 

84- 3740 

85- 3833 
87-3918 
91-4045 
94-4128 
98-4262 
105-444<i 



•33-1722 33-1744 *34-1765 



57-2093 
62-2299 
65-2456 
68-2653 
79-3380 

81- 3479 

82- 3544 

83- 3652 

84- 3749 

85- 3840 
87-3924 
91-4052 
95-4148 
98-4268 
105-4453 



60-2171 
62-2310 
65-2463 
68-2679 
79-3392 
81-3482 

83- 3575 

84- 3670 

85- 3786 

86- 3853 
S7-3931 
91-4061 
95-4153 
98-4275 
105-4465 



60-2179 
62-2317 
65-2477 
69-2710 
79-3399 
81-3493 

83- 3591 

84- 3687 

85- 3789 

87- 3876 

88- 3943 
91-4069 
96-4190 
99-4288 
105-4471 



34-1780 

60-2187 
62-2321 
66-2518 
70-2737 
79-3404 
81-3500 

83- 3600 

84- 3696 

85- 3800 
87-3879 
89-3981 
92-4078 
96-4197 
100-4313 
105-4477 



60-2194 
64-2374 
67-2553 
70-2755 
79-3411 
81-3505 

83- 3607 

84- 3703 

85- 3807 
87-3891 
89-3988 
93-4095 
96-4203 
101-4336 
105-4484 



•36-1785 *36-1785 *36-1785 58-2106 •58-2106 *58-2106 •58-2116 



50-1910 
50-1910 
50-1910 
110-4609 
58-2107 
43-1903 
•37-1787 

•58-2106 
•77-3313 



50-1910 
50-1910 
50-1910 



•37-1787 
•77-3318 



50-1910 
50-1910 
50-1910 



50-1910 
50-1910 
50-1910 



50-1910 
50-1910 
50-1910 



50-1910 
50-1910 
50-1910 



50-1910 
50-1910 
58-2107 



37-1787 37-1787 37-1787 37-1787 #37-1787 



•73-2860 •77-3311 



aKTBD 

SYMBOL 
SYMBOL 
KDPORO 
KDPDRl 
KDPDR2 
<DPDR3 
KDPDR4 
ICDPDR5 
KDPDR6 
<DPDR7 
KERSTK 



KIPARO 
< I PARI 
KIPAR2 
ICIPAR3 
Kl ARA 
KIPAR5 
k:IPAR6 
(CIPAR7 
KIPDRO 
KIPDR1 
KIPDR2 
KIPDR3 
KIPDR4 



KIPDR5 
ICIPDR6 
KIPDR7 
KSP 



CREATED 8Y MACRO ON 12-JAN-82 AT 



CROSS REFERENCE 
VALUE 
= 172320 
= 172322 
= 172324 
= 172326 
= 172330 
= 172332 
= 172334 
= 172336 
= 001100 



172340 
172342 
172344 
172346 
172350 
172352 
172354 
172356 
1 72300 
172302 
172304 
172306 
172310 



IF 

LOOP 

HFPDLD 

MFPDLP 

HFPDPS 

MFPDTS 

HFPDVC 

HFPOVl 

HFPILD 

HFPILP 



= 172312 
= 172314 
= 172316 
=X000006 



000012 
020560 
003004 
002770 
002772 
002746 
003040 
033564 
002532 
002516 



REFERENCES 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1211 
67-2570 
79-3371 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
#15-1198 
♦67-2546 
•81-3535 
#15-1198 
#15-1198 
#15-1198 
#15-1205 
•39-1843 
•39-1864 
•57-2088 
•64-2402 
•65-2482 
71-2793 
•80-3445 
•83-3572 
•84-3744 
•86-3856 
•90-4017 
•97-4227 
#15-1197 
#58-2109 
•34-1767 
#34-1770 
#34-1771 
#34-1765 
34-1773 
96-4185 
•32-1678 
#32-1683 



12:24 PAGE 6 
SEQUENCE 154 

CREF vol 



L 12 



•73-2857 
•73-2853 
•73-2859 
•77-3310 



27-1539 
62-2305 
67-2575 
81-3473 
27-1547 



•60-2152 
•60-2153 
•67-2545 

27-1557 
27-1535 



•64-2355 
•33-1732 
•67-2615 
•89-3972 
•64-2356 



28-1591 

39-1845 
•39-1870 

57-2089 
•64-2410 
•66-2514 
•71-2798 
•80-3446 
•33-3578 
•84-3745 

87-3868 
•95-4143 
•99-4286 

43-1903 

110-4609 
•34-1768 

34-1781 
•96-4184 

96-4187 
#34-1783 
#97-4219 
•32-1679 

32-1698 



•74-3011 
•74-3012 
•74-3013 
•89-3965 



64-2362 
68-2636 
85-3783 



•66-2501 
♦66-2502 



•66-2503 
♦33-1736 
♦70-2732 
♦89-4003 
•67-2547 



•28-1592 
•39-1846 
•39-1871 
♦57-2095 
•64-2411 
•67-2570 
•74-3177 
81-3473 
♦83-3647 
♦84-3751 
♦88-3938 

95- 4144 
♦99-4287 

43-1903 

#34-1774 

96- 4183 

96-4194 
♦96-4185 

#32-1687 
79-3384 



•95-4140 •96-4173 



64-2366 
68-2658 
85-3844 



•74-3014 
♦60-2163 
♦70-2762 
♦96-4181 
•67-2616 



•28-1593 
•39-1850 
•56-2061 
•57-2096 
•65-2433 
•67-2575 
•77-3306 
•81-3475 
•83-3648 
♦84-3752 
♦88-3939 
95-4145 
♦99-4290 



64-2379 
68-2684 
87-3873 



•70-2730 •79-3362 



•74-3176 
•61-2234 
•73-2856 
•96-4214 



•28-1604 
♦39-1851 
•56-2062 
•58-2110 
•65-2437 
•68-2636 
•77-3319 
•82-3539 
•83-3654 

85-3778 
♦88-3945 

95-4151 
•99-4291 



65-2433 
70-2741 



•64-2360 
•74-3010 
♦98-4246 



•28-1605 
•39-1857 

56-2063 
•64-2362 
•65-2450 
•68-2658 

79-3371 
•82-3540 
•83-3655 
•85-3844 
♦88-3946 
♦95-4155 



65-2437 
71-2798 



♦65-2431 
•79-3366 
•98-4279 



•33-1731 
39-1859 
•56-2067 
•64-2366 
♦65-2472 
♦68-2684 
♦79-3373 
•82-3546 
•84-3662 
•86-3848 
•90-4012 
•97-4222 



96-4201 96-4207 



81-3485 85-3792 87-3883 89-3974 



65-2450 
74-3177 



•66-2504 
•79-3434 



•39-1790 
•39-1860 
•56-2068 
•64-2379 
•65-2473 
•70-2741 
•80-3438 
•82-3547 
•84-3667 
♦86-3849 
♦90-4013 
♦97-4223 



66-2514 
77-3319 



♦66-2528 
♦81-3466 



•39-1818 
•39-1863 
•57-2087 
•64-2401 
•65-2481 
71-2792 
•80-3439 
•83-3567 
•84-3673 
•86-3855 
•90-4016 
•97-4226 



98-4248 



CKKTBD 

SYMBOL 
SYMBOL 
HFPIPS 
MFPITS 



MFPIVC 
MFPIV1 
MFPIV2 
MFPIV3 
MFPIV^ 
MFPIV5 
HfPIV6 
nCMERR 



MGMFLG 
MHRO 



CREATED BY MACRO ON 12-JAN-82 AT 



MMRI 
NMR2 
MMR3 



CROSS REFERENCE 
VALUE 
002520 
002464 



002622 
027566 
030164 
031674 
032304 
032562 
034036 
016142 



MTPILD 
MTPILP 
HTPIPM 
MTPITA 
MTPITS 



MTPIVC 
MTPIVl 
HTPIV2 



016144 
177572 



177574 
177576 
172516 



MMVEC = 000250 



002676 
002654 
002656 
002720 
002626 



002744 
030614 
031260 



REFERENCES 
#32-1684 
#32-1676 
81-3497 
85-3816 
87-3922 
98-4272 
32-1686 
79-3388 
81-3470 
85-3777 
87-3865 
89-3976 
98-4250 

32- 1688 
64-2414 

83- 3581 
#57-2080 
#15-1201 
•73-2854 
•73-2922 
•73-2968 
•74-3037 
•74-3114 
•74-3172 
•75-3224 
•76-3276 

92-4075 
•102-4354 
•105-4464 
•109-4599 
#15-1202 
#15-1203 
#15-1204 
•77-3312 
•96-4180 
•106-4518 
#15-1198 
•60-2162 
•64-2414 
•73-2861 
•83-3579 
•87-3869 
•33-1724 
#33-1728 
#33-1729 
•33-1726 
#33-1722 

84- 3692 
91-4066 

33- 1733 

83- 3568 

84- 3663 



12:24 PAGE 7 
SEQUENCE 155 

CREF VOI 



•79-3386 
79-3389 
81-3503 
85-3824 
87-3929 

#32-1703 
#80-3438 
81-3488 
85-3794 
87-3885 
#90-4008 
#99-4283 
33-1735 
65-2485 
84-3666 
•57-2094 
28-1594 
•73-2863 
•73-2927 
•73-2972 
•74-3043 
•74-3125 
•74-3175 
•75-3228 
•76-3279 
94-4125 
•103-4374 
•105-4466 

28-1595 
28-1596 
•28-1582 
•77-3320 
•96-4212 
•107-4536 
•32-1686 
•60-2216 
•65-2430 
•77-3302 
•83-3581 

•33-1725 
33-1745 
•83-3584 
#33-1 738 

83- 3587 

84- 3700 
93-4091 

#33-1747 

83- 3579 

84- 3674 



•81-3486 
79-3396 
81-3509 
85-3831 
89-3978 



•85-3793 
79-3402 
81-3517 
85-3838 
89-3985 



« 12 



•87-3884 
79-3408 
81-3524 
87-3888 
89-3 y92 



•89-3975 
79-3416 
81-3531 
87-3895 
89-3998 



•98-4249 
79-3423 
85-3797 
87-3901 
98-4252 



79-3430 
85-3804 
87-3907 
98-4259 



•79-3388 •81-3488 ^85-3794 ^87-3885 •89-3976 ^98-4250 

#82-3539 
#86-3848 
#88-3938 



34-1775 
66-2529 
84-3676 
•58-2122 
•28-1602 
•73-2882 
•73-2932 
•73-2977 
•74-3055 
•74-3131 
•75-3191 
•75-3231 
•76-3284 
97-4219 
•103-4377 
•105-4470 

77-3322 
77-3323 
•28-1606 
•89-3971 
•98-4244 
•108-4554 
•32-1688 
•61-2233 
•65-2443 
•77-3303 
•84-3663 

#33-1734 
83-3583 
•84-3679 

83- 3596 

84- 3708 
93-4099 

•84-3680 
#83-3647 
84-3680 



#57-2079 
67-2617 
85-3779 

•58-2124 
•73-2887 
•73-2937 
•73-2982 
•74-3081 
•74-3136 
•75-3197 
•76-3247 
•76-3287 
99-4283 
•105-4416 
•105-4472 

90-4009 
90-4010 
•58-2125 
•89-4004 
•98-4277 
•109-4569 
•33-1733 
•61-2281 
•65-2485 
•77-3332 
•84-3666 



84-3678 
•91-4037 

83- 3604 

84- 3718 
93-4107 

•91-4038 

#84-3744 



58-2118 
70-2761 
87-3869 

•60-2167 

•73-2892 

•73-2942 

•73-2986 

•74-3087 

•74-3142 

•75-3203 

•76-3253 

•77-3307 

•100-4305 

•105-4422 

•105-4476 

92-4076 
92-4077 
•73-2864 
90-4011 
•100-4301 
•109-4600 
•33-1735 
•62-2296 
•66-2507 
•77-3333 
•84-3674 



91-4036 
•93-4087 

83- 3612 

84- 3727 
93-4116 

•93-4088 



60-2216 
71-2831 



•60-2198 
•73-2897 
•73-2947 
•73-2992 
•74-3093 
•74-3149 
•75-3206 
•76-3259 
77-3321 
•100-4308 
•105-4441 
•105-4478 

94-4126 
94-4127 
•75-3189 
•91-4034 
•101-4324 

•34-1773 
•62-2301 
•66-2529 
•81-3470 
•84-3676 



93-4086 



83- 3622 

84- 3737 



61-2281 
77-3332 



•61-2238 

•73-2902 

•73-2952 

•73-2997 

•74-3099 

•74-3155 

•75-3211 

•76-3262 

•77-3331 

•101-4328 

•105-4443 

•105-4482 

97-4220 
97-4221 
•75-3232 
•91-4071 
•102-4347 

•34-1775 
•62-2304 
•67-2567 
•81-3472 
•85-3777 



83-3631 
91-4041 



62-2301 
81-3472 



•61-2269 

•73-2911 

•73-2957 

•74-3027 

•74-3103 

•74-3162 

•75-3215 

•76-3267 

•79-3361 

•101-4331 

•105-4449 

•105-4485 

99-4284 
99-4285 
•76-3245 
•93-4084 
•103-4370 

•58-2118 
•64-2359 
•67-2573 
•83-3568 
•85-3779 



83-3640 
91-4049 



81-3490 
85-3810 
87-3915 
98-4266 



62-2304 
83-3571 



•62-2297 
•73-2916 
•73-2963 
•74-3033 
•74-3108 
•74-3165 
•75-3221 
•76-3271 
90-4008 
•102-4351 
•105-4454 
•105-4489 



•76-3288 
•93-4121 
•104-4396 

•58-2119 
•64-2372 
•67-2617 
•83-3571 
•87-3865 



84-3683 
91-4057 



CREATED BY fWCRO ON 12-JAN-82 AT 



CICKTBD 

SYtea CROSS reference 

SYMBOL VALUE 

«TPIV3 033022 

HTPIVA 033242 

NOFLAG 002242 

NODSPA 002232 

PATCH 016232 

PBAHI 001302 

PSALO 001 300 

PCSHPS 035320 

PCSMRO 035324 

PCSMSP 035322 

PFECDF 004302 

PFECDH 004242 

PFECDT 004272 

PFECEM 004202 

PFECyS 004172 

PIRQ = 177772 

PIRQVE = 000240 

PRO = 000000 

PRl - 000040 

PR2 = 000100 

PR3 = 000140 

PR4 = 000200 

PR 5 = 000240 

PR6 = 000300 

PR7 = 000340 

PS = 177776 

PSW = 177776 



PWRMSG 

PWRVEC 

RDCHR 

RDLIN 

REGCHG 

REGDAT 

REGLAe 

RESREG 
RESVEC 



RE TURN 
R6 

R7 

5AVRE6 
SCOPE 



007460 
000024 
104411 
104412 
035770 
036006 
035764 

104414 
000010 



035342 
=X000006 
^X000007 
: 104413 
- 000004 



12:24 PAGE 8 
SEQUENCE 156 

CREF vol 



N 12 



REFERENCES 
91-4038 
93-4088 
#28-1584 
#28-1581 
#57-2100 
#20-1249 
#20-1249 
•104-4397 
*1 05-4407 
•105-4414 
39-1876 
39-1876 
39-1876 
39-1876 

39- 1801 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
•58-2113 
•61-2278 
•68-2662 
•69-2707 

77-3317 
•85-3842 
•101-4332 
105-4444 
51-1911 
#15-1197 

40- 1882 
#50-1910 

109-4572 
109-4573 
109-4576 
109-4607 
49-1909 
#15-1197 
•101-4330 
•105-4418 
••05-4405 
#15-1197 
#15-1197 
49-1909 
#15-1197 



#92-4075 
#94-4125 
•28-1603 
73-2861 



105-4413 
#105-4501 
•105-4415 
#39-1881 
#39-1878 
#39-1880 
#39-1877 
#39-1876 



15-1197 
29-1617 
•58-2115 
•61-2280 
•68-2669 
•71-2788 
•79-3369 
•87-3860 
•102-4348 
105-4455 
#51-1912 
•51-1911 
#50-1910 

#109-4607 
#109-4608 

109-4604 

109-4607 
#50-1910 
•58-2106 

102-4349 
•109-4574 

105-4425 
♦58-2106 

#50-1910 
60-2150 



105-4431 105-4459 #105-4499 
105-4467 #105-4500 



29-1619 
60-2169 
•62-2298 
68-2676 
•71-2797 
•81-3469 
•87-3867 
•102-4355 
•106-4520 



32-1685 
•60-2202 
•68-2635 
♦68-2678 
•71-2799 
•83-3566 
•87-3933 
•103-4371 
•106-4525 



•32-1692 

•60-2207 

•68-2643 

•68-2683 

•71-2801 

•83-3577 

•95-4141 

♦104-4401 

♦107-4538 



•106-4519 •107-4537 •108-4555 



•32-1699 
♦60-2213 
68-2650 
♦68-2686 
♦75-3190 
♦84-3661 
♦98-4278 
♦105-4406 
♦107-4543 



33-1730 
♦60-2215 
♦68-2652 
♦68-2688 
♦76-3246 
•84-3672 
•100-4302 
♦105-4413 
•108-4560 



34-1772 
61-2240 
♦68-2657 
♦69-2701 
•76-3290 
♦85-3770 
♦100-4309 
♦105-4421 
♦109-4568 



♦58-2111 
♦61-2273 
•68-2660 
69-2705 
77-3315 
•85-3776 
•101-4325 
105-4437 
•109-4601 



♦51-1911 ^51-1911 ♦51-1911 ♦51-1911 ♦51-1911 ♦58-2106 ^50-2106 



#109-4605 
109-4608 

58-2106 
♦102-4350 

105-4496 
♦58-2106 



109-4605 
109-4608 

♦58-2106 
♦102-4353 

#105-4508 
58-2106 



109-4607 
109-4608 

100-4303 
103-4372 



109-4607 
109-4608 



109-4607 
109-4608 



109-4607 
109-4608 



♦100-4304 ♦100-4307 101-4326 
•103-4373 ^103-4376 •105-4411 



109-4607 



♦101-4327 
105-4418 



61-2226 62-2294 64-2354 65-2427 66-2500 67-2544 68-2632 



CKkTBD 



CREATED BY PWCRO ON 1<^-jAN-8? AT V: 



Sr^eOL CROSS REFERENCE 



24 PAGE 9 
SEQUENCE 157 

CREF VOI 



B 13 



StPvOL 


VALUE 








73-2852 


74-3008 


75-3186 


76-3242 






/;Q-?^97 


7n-?7?9 

f W C ' C T 


7} -2777 








0 1 J^tOc 


B7-XS6^ 
OJ JJVJ 


84-3657 


85-3768 


87-3858 


89-3962 


91-4033 








TO 1 O" 


TO ■•C — w 


100-4300 


101-4323 


102-4346 


103-4369 


104-4392 








inR-4^^^ 


109-4567 


1 10-4609 


•104-4402 








Cf\D Aon 


* 


1 ' ccOU 




C • 1 Jvv 


•104-4395 












^ 755A5 


#1 ^-1 10R 

# 1 J 1 1 TO 


















1 755A/. 


» 1 J 1 1 TO 




















» 1 J 1 1 TO 


*0A«^1 70 
















1 7557n 


#1 1 0ft 

» 1 J" 1 1 TO 
















1 r Cc ' c 


iri S-1 1 9ft 

# 1 J I I TO 














cripADA 




1 7007Z. 


^Ifi-I 19ft 
» 1 J IP TO 














C r\D AD 7 

bDrAH 




1 7557A 
1 f CC 1 0 


«1 ^•H Oft 
W 1 J— 1 1 TO 


















1 7???n 

1 ' cccU 


^^^ ^-1 19ft 

M 1 1 1 TO 




•75-3198 










iKrUn 1 




1 I ccCC 


#1 S-l 19ft 

• 1 J II TO 


♦75-3187 










cr\Dr\D 0 




1 feed'* 


#1 S-1 19ft 

^ 1 J 1 1 TO 














c r\Dr\o T 




1 7? J?A 


M^ 1 0ft 

• 1 ? ~ 1 1 TO 




•96-4177 


•98-4245 








cr\Dr\DZ 




1 7??^0 


M^ <;-i 19A 














1 7??7? 


M^ ^-1 19ft 

if I J II TO 


















1 f ec J** 


#1 S-1 1 9ft 

W 1 J II TO 


















1 7??^A 
1 r ce JO 


if i J 1 1 TO 




•68-2685 


•106-4521 


•106-4526 




C T oAon 




1 7??An 


#1 19ft 

^ \ J II TO 


?7-1 559 


•68-2666 




c ^PAt>^ 




1 7??i? 
1 ' cc**c 


#1 S-1 198 














J 1 r«nc 




1 T>'>LL 


#15-1198 

(F 1 ^ II TO 


♦60-P1 54 












c T PAO''( 




\ 1 CCHO 


1 J f 1 70 


•79-3363 










J i rnnH 




1 7??sn 

1 r CCjv 




•60-2155 










5 i rnn J 




1 7??S? 

1 r C C ^C 


#1 S-1 198 


















1 7??^Z. 
1 f CC ?*• 


#1 S-1 198 

99 I J II TO 


?7-1 SA? 

c ' 1 ^Oc 












C t DAD7 




1 7??^A 


«1 C_1 1 Qfi 

w 1 J 1 1 TO 
















1 7??on 


#1 ^-1 1 9ft 

W \ J II TO 


27-1 541 

C ' 1 1 












J i run 1 




1 7??n? 

1 ' ccUc 


#1 S-1 198 














0 1 rur\£ 




1 7??ftA 


«i S-1 198 

W 1 J IP TO 


•7S-^1 99 

^ f J J 1 tt 














~_ 


1 72206 


M^ <t-i 1 0ft 

w 1 J 1 1 TO 




•8S-377S 


•85-3843 


•93-4082 


SIP0R4 


~_ 


1 7??i n 
1 ^cc 1 u 


#1 ^-1 1 9ft 

» 1 J~ 1 1 TO 


*A0-?1 f\L 
»Ov c 1 0*« 


*61-22'?S 




C f Df\DC 




1 7??1 ? 


m \j > 1 TO 














SIrDHC) 




1 7??1Z. 

1 f CC 1 "1 


#1 C.l 1 0ft 

m 1 J 1 1 TO 


















1 ' CC 1 O 


#1 ^-1 1 9ft 

w 1 1 1 TO 










61-2254 


62-2306 


con 


mm 


1 f fore 


#1 S-1 198 

99 \ J II TO 


1 5-1201 

I J 1 C w 1 


57-2090 


•57-2092 


60-2183 




Az.-?Tftn 


■oi c J~0 


64-240^ 

0*» C"»wJ 


•64-2405 

"0"t C*twJ 


6S-2451 


•65-2467 


65-2474 








/^7-?S71 
Of cjf 1 


A7-2S7A 


/'>7-2S9? 
Or cjyc 


•67-2606 


70-2743 


•70-2759 


71-2794 








"OU j'»'»c 


ft?-XS^1 
Oc JJ*» 1 


•ft2-^S4^ 

"Oc J J 


8^-^649 


•83-3651 

" O^ J^JJ 1 


84-3746 


•84-3748 








ftft-^9^0 

OO JTHU 


*ftft-'^942 

^OO JTHC 












CD1 




177574 


#1 S-1 1 9ft 

W \ J i 1 TO 


1 S-1 ?0? 

1 J 1 c uc 








62-2303 


64-2381 


SR2 




177576 


#1 S-l 1 Oft 

W I J I 1 TO 


1 S-1 20^ 


S7-2091 

-/ f C vT I 


60-2184 

Dv C 1 0*» 


61-2255 

U I c c ^ ^ 




0? c** ' J 


A/^-?S1 S 
OO c? 1 J 


A7-2S^9 

Of C JH — 


67-2SS8 

Or C J JO 




67-?^77 


67-2596 








71 -?70S 


ftn-^441 


82-^542 
oc jjHc 


8!i-3650 


84-3747 

0"t J 1 ^ * 


86-3851 


88-3941 


on J 




172516 


#1 S-1 198 

w I J I \ TO 


1S-1204 






79-3370 


•83-3569 


83-3570 


CCP 


Z000006 


if1S-1?06 


^ ^O C I I c 


•68-2670 


•68-2687 

OO C W ' 






•85-3782 


•104-4398 


105-4426 


•106-4522 


•107-4540 


•108-4557 


95-4142 


STACK 




001100 


♦15-1197 


15-1211 


15-1212 


15-1213 


58-2106 


58-2110 


START 




020000 


17-1246 


51-1911 


#58-2106 










STXLHT 




}7777(, 


#15-1197 














SUPERH 




035340 


105-4446 


#105-4507 













77-3299 79-3359 
93-4081 95-4139 
106-4ST7 107-4535 



•96-4174 



62-2309 
•65-2476 
•71-2796 

86-3350 



64-2404 
67-2607 



•83-3580 
95-4155 



•62-2326 
•66-2522 
80-3440 
•86-3852 



65-2452 
70-2744 



85-3780 



CREATED BY I1ACR0 ON 12-JAN-82 AT 



SYMBOL CROSS REFERENfE 
SYMBOL VALUE 
SUPS TIC = 000700 
SWR 001 UO 



SUREG 

SWO 

SUOO 

SW01 

SW02 

SWO 3 

SU04 

SW05 

SW06 

SW07 

SU08 

SW09 

SU1 

SU10 

SU11 

SU12 

SU13 

suu 

SW15 

su2 

SU3 

SU4 

SW5 

SW6 

SU7 

SW8 

SW9 

TBIT 

TBITPS 

TBITVE 

TESTNO 



TIMERR 

TIMFLG 

TKVEC 

TOFF 

TON 

TPVEC 

TRAPPC 



TRAPPS 



000176 
000001 
000001 
000002 
OOOOOA 
0OO010 
0. 020 
OOOOAO 
000100 
000200 
OOOAOO 
001000 
000002 
002000 
004000 
010000 
020000 
040000 
100000 
000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
000020 
001274 
000014 
001254 



016070 
016072 

= 000060 
002356 
002412 

= 000064 
001260 



001262 



REFERENCES 
#15-1212 
#20-1249 
40-1882 
58-2107 
#17-1246 
#15-1197 
#'5-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1208 
#20-1249 
#15-1197 
#20-1249 
54-2010 
54-2019 
54-2028 
#56-2053 
#56-2054 
#15-1197 
#29-1617 
#30-1634 
#15-1197 
#20-1249 
•64-2401 
83-3655 
•97-4222 
#20-1249 
•64-2402 
83-3654 
•97-4223 



58-2112 

36-1785 

40-1882 

105-4493 

40-1882 

15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 
15-1197 



29-1617 
♦29-1620 
♦58-2106 
♦37-1787 
54-2011 
54-2020 
54-2029 
58-2116 
♦56-2065 

68-2633 
68-2690 

♦28-1592 

64-2411 
•84-3744 

97-4227 
•28-1593 

64-2410 
•84-3745 

97-4226 



12:24 PAGE 10 
SEQUENCE 158 

CREF VOI 



C 13 



68-2670 

36-1785 

51-1911 

110-4609 

40-1882 



29- 1622 

30- 1634 
•58-2106 

54-2003 
54-2012 
54-2021 
54-2030 
68-2689 
•58-2121 

71-2778 
71-2833 

28-1605 
♦65-2472 

84-3752 
•99-4286 

28-1604 
•65-2473 

84-3751 
•99-4287 



68-2687 
36-1785 
51-1911 



30-1634 
30-1636 

54-2004 
54-2013 
54-2022 
54-2031 
70-2760 



77-3300 



54-2003 
65-2482 

♦86-3848 
99-4291 
54-2003 
65-2481 

•86-3849 
99-4290 



79-3374 
36-1785 
58-2106 



58-2106 58-2107 



54-2005 
54-2014 
54-2023 
54-2032 
71-2829 



54-2004 
•80-3438 
86-3856 

54-2004 
•80-3439 
86-3855 



83-3578 
37-1787 
•58-2106 



•30-1637 ^58-2123 



54-2006 
54-2015 
54-2024 



•56-2061 
80-3446 
•88-3938 

•56-2062 
80-3445 
•88-3939 



85-3780 
37-1787 
58-2106 



104-4398 
37-1787 
•58-2106 



106-4522 
37-1787 
•58-2106 



54-2007 
54-2016 
54-2025 



54-2008 
54-2017 
54-2026 



54-2009 
54-2018 
54-2027 



56-2068 
•82-3539 
88-3946 

56-2067 
•82-3540 
88-3945 



•57-2087 
82-3547 
•90-4012 

•57-2088 
82-3546 
•90-4013 



57-2096 
•83-3647 
90-4017 

57-2095 
•83-3648 
90-4016 



ik^ IBD 

SYMBOL 

TRAPVE 

TRTVEC 

Ti>T^ 

TST'O 

TST1 I 

Tsn2 
Tsn3 

TSTU 

rsns 

TST16 
TST17 

rsT2 

TST20 

TST21 

TST22 

TST23 

TST2A 

rST25 

TST26 

TST27 

TST3 

TST30 

TST31 

TST32 

TST33 

TST34 

TST35 

TST36 

TST57 

TST^ 

TST^O 

TST41 

TST4? 

TST43 

TST44 

TST5 

TST6 

TST7 

TYPBN 

TYPDS 

TYPE 



CREATED BY MACRO ON 12-JAN-82 AT 



CROSS REFEPENCE 
VALUE 
- 000034 
^ 0000 K 

020704 

023160 

023462 

023552 

023742 

024256 

025234 

026272 

026542 

021222 

027016 

027232 

027634 

030232 

030662 

031326 

031742 

032352 

021456 

032636 

033042 

033262 

033332 

033632 

034104 

034174 

034266 

021632 

034360 

034446 

035344 

035420 

035474 

035542 

022126 

022A06 

022566 
= 104406 
= 104405 
= 104A01 



TYPOC 

TYPON 

TYPOS 

UOPARO 

UDPAR1 

UDPAR2 



= 104402 
= 104404 
= 104403 
= 177660 
= 177662 
= 177664 



REFERENCES 
#15-1197 
#15-1197 
#60-2150 
#68-2632 
#69-2697 
69-2715 
M7'\-2777 

#74-3008 
#75-3186 
#76-3242 
#61-2226 
M77-1299 
#79-3359 
79-3435 
81-3536 

83- 3645 

84- 3742 

85- 3845 
87-3935 

#62-2294 
89-4005 
91-4072 
93-4122 

#96-4169 
96-4216 
98-4280 

100- 4314 

101- 4337 
#64-2354 

102- 4360 

103- 4382 

104- 4403 
#107-4535 
#108-4553 
#109-4567 
#65-2427 
#66-2500 
#67-2544 

39-1838 
39-1832 
37-1787 

39- 1867 

40- 1882 
40-1882 
58-2107 
39-1797 

#50-1910 
#50-1910 
#15-1198 
#15-1198 
#15-1198 



12:24 PAGE 11 
SEQUENCE 159 

CREF vol 



D 13 



•58-2106 •58-2106 



#70-2729 



#81-3462 
#83-3563 
#84-3657 
#85-3768 
#87-3858 
#89-3962 

#91-4033 
#93-4081 
#95-4139 

#98-4240 
#100-4300 
#101-4323 
#102-4346 

#103-4369 
#104-4392 
#106-4517 



#50-1910 
41-1894 
37-1787 

39- 1872 

40- 1882 

41- 1888 
58-2108 
39-1826 



#50-1910 

39- 1789 

40- 1882 

40- 1882 

41- 1892 
110-4609 
40-1882 



110-4609 

39- 1810 

40- 1882 

40- 1882 
43-1903 
110-4609 

41- 1891 



110-4609 

39- 1812 

40- 1882 
40-1882 
45-1905 
110-4609 

#50-1910 



39- 1815 

40- 1882 
40-1882 
46-1906 



39- 1817 

40- 1882 
40-1882 
47-1907 



39- 1847 

40- 1882 
40-1882 

#50-1910 



39- 1861 

40- 1882 
40-1882 
51-1911 



27-1566 *107-4539 *107-4544 



SYMBOL 
SYMBOL 
UDPAR3 
UDPARA 
UDPAR5 
UDPAR6 
UDPAR7 
UDPORO 
UDP0R1 
UDP0R2 
UDP0R3 
UDPDRA 
U0P0R5 
UDPDR6 
UDPDR7 
UIPARO 
UIPAR1 
UIPAR2 
UIPAR3 
U I PARA 
UIPAR5 
UIPAR6 
U1PAH7 
UIPDRO 
UIPDR1 
UIP0R2 
UIPDR3 
UIPORA 

UIPDR5 
UIPDR6 
UIPDR7 
USESTK 

USP 

VIRTI 
UASR6 
UASSRO 



UASSR1 
UASSR2 



yASSR3 
U8IT 
SAPTHD 
SASTAT 



CREATED BY MACRO ON 12-JAN-82 AT 



CROSS REFERENCE 
VALUE 
^ 177666 
= 177670 
= 177672 
= 17767A 
= 177676 
= 177620 
= 177622 
= 177624 
= 177626 
= 177630 
= 177632 
= 177634 
= 177636 
= 177640 
= 177642 
= 177644 
= 177646 
= 177650 
= 177652 
= 177654 
= 177656 
= 177600 
= 177602 
= 177604 
= 177606 
= 177610 

= 177612 
= 177614 
= 177616 
= 000600 

=X000006 

001276 
001256 
001264 



001266 
001270 



001272 
000100 
000204 
****** 



REFERENCES 

#15-1198 

*1 5-1 198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

#15-1198 

*96-4176 

#15-1198 

#15-1198 

#15-1198 

#15-1213 

108-4557 
#15-1207 
•84-3675 
#20-1249 
#20-1249 
#20-1249 
54-2016 
61-2256 
67-2578 
•83-3649 
#20-1249 
#20-1249 
54-2016 
•62-2303 
•66-2515 
67-2597 
•83-3650 
#20-1249 
#15-1209 
19-1248 
44-1904 



12:24 PAGE 12 
SEQUENCE 160 

CREF V01 



E 13 



•98-4241 

•76-3243 
•89-3967 



•60-2156 
•60-2157 



27-1545 



•71-2781 
•60-2165 



58-2114 

•58-2114 
87-3870 

54-2003 
•28-1594 
54-2017 
•62-2309 
•67-2592 
•84-3746 
•28-1595 
•28-1596 
54-2017 
62-2312 
66-2516 
•67-2607 
•84-3747 
•90-4011 

#19-1248 
44-1904 



•76-3254 



•96-4175 •96-4215 



27-1565 •68-2640 •68-2659 •108-4556 •I 08-4561 



♦71-2779 

•71-2780 *81-3464 



•84-3659 



•71-2832 
•61-2236 



68-2644 

•68-2644 
•87-3872 

54-2004 
28-1597 
54-2021 

•64-2380 
67-2593 

•86-3850 
54-2023 
54-2004 
54-2023 
62-2314 

•67-2549 
67-2609 

•86-3851 



•76-3255 
•71-2782 



68-2661 
•68-2661 



•56-2063 
54-2004 
54-2023 
64-2383 
•70-2743 
•88-3940 
54-2026 
54-2007 
54-2026 
•64-2381 
67-2551 
•70-2744 
•88-3941 



•76-3289 
•84-3658 



71-2800 
•71-2789 



•57-2089 
54-2006 
54-2026 

•64-2403 
70-2746 

•90-4008 

•90-4009 
54-2008 

•57-2091 
64-2390 

•67-2558 
70-2750 

•90-4010 



•87-3866 ^87-3934 ^89-3968 •93-4083 



81-3476 
•71-2800 



54-2008 
•57-2090 
•65-2451 
•71-2794 
•97-4219 
•97-4220 

54-2011 
•60-2184 
•64-240A 

67-2560 
•71-2795 
•97-4221 



84-3673 
81-3471 



54-2010 
•60-2183 
65-2454 
71-2813 
•99-4283 
•99-4284 
54-2012 
60-2192 
•65-2452 
•67-2577 
71-2816 
•99-4285 



87-3870 
•84-3664 



54-2013 
60-2185 
•65-2474 
•80-3440 



54-2013 
•61-2255 
65-2461 
67-2581 
•80-3441 



107-4540 
84-3665 



54-2014 
•61-2254 
•67-2576 
•82-3541 



54-2014 
61-2263 
•65-2475 
•67-2596 
•82-3542 



F 13 



CKKTBD 


CREATED BY 


MACRO ON 12-JAN-82 AT 


12:24 


PAGE 13 














SEQUENCE 161 








SYMBOL 


CROSS REFERENCE 








CREF vol 








SYMBOL 


VALUE 


REFERENCES 


#44-1904 












$ATYC 


006022 


44-1904 












SATYl 


005776 


#44-1904 


#44-1904 












$ATY3 


006004 


43-1903 












$ATYA 


006014 


37-1787 


#44-1904 




40-1882 


•58-2107 






SAUTOB 


001134 


#20-1249 


40-1882 


40-1882 






SBDAOR 


001122 


#20-1249 














S8DDAT 


001126 


#?0-1249 


37-1787 




38-1787 








S8ELL 


001214 


#20-1249 


38-1787 








S8IN 


006316 


*45-1905 


•45-1905 


45-1905 


#45-1905 


#43-1903 






SCHARC 


005772 


•43-1903 


•43-1903 


43-1903 


•43-1903 






tCKSUR 


004306 


#40-1882 


50-1910 


50-1910 










SCLR.T 


036242 


11 0-4609 


#110-4609 










58-2106 


SCniAG 


001100 


#20-1249 


58-2106 


58-2106 


58-2106 


58-2106 


58-2106 


SCM1 


= 000006 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 






#20-1249 












#20-1249 


%cnz 


= 000014 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 
#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


sens 


= 000006 


#20-1249 


20-1249 


20-1249 










SCM4 


= 000006 


#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 




#20-1249 
#20-1249 


20-1249 


20-1249 


#20-1249 


20-1249 


20-1249 


#20-1249 


»CNTLC 


001312 


#20-1249 


40-1882 


40-1882 


40-1882 


40-1882 






SCNTLG 


005253 


40-1882 


#40-1882 












SCNTLU 


005246 


40-1882 


40-1882 


#40-1882 










$CPUOP 


001252 


#20-1249 










39-1812 


39-1817 


SCRLF 


001221 


#20-1249 


37-1787 


38-1787 


38-1787 


39-1789 




40-1882 


40-1882 


40-1882 


43-1903 


43-1903 


43-1903 


110-4609 


SDBLK 


006762 


47-1907 


47-1907 


#47-1907 










SDB20 


007066 


39-184-4 


39-1858 


#49-1909 










SOEVCT 


001234 


#20-1249 














SOOAGN 


036262 


110-4609 


110-4609 


110-4609 


#110-4609 








SOTBL 


006752 


47-1907 


#47-1907 












SENDAO 


036252 


18-1247 


37-1787 


58-2107 


#110-4609 








SENOCT 


036054 


58-2106 


#110-4609 












SENULL 


036324 


#110-4609 










58-2107 




SENV 


001244 


#20-1249 


37-1787 


43-1903 


44-1904 


44-1904 




SENVn 


001245 


#20-1249 


43-1903 


43-1903 


44-1904 


58-2106 






SEOP 


036024 


41-1896 


109-4602 


#110-4609 

WW t t ^ ~wW r 










lEOPCT 


036046 


*58-2106 

^ w b 1 WW 


#110-4609 


110-4609 






36-1785 


36-1785 


SERFLG 


001103 


#20-1249 


36-1785 


•36-1785 


36-1785 


•36-1785 




38-1787 














SERMAX 


001115 


#20-1249 


•36-1785 


36-1785 


36-1785 


•58-2106 






SERROR 


003270 


#37-1787 


58-2106 










39-1795 


SERRPC 


001116 


#20-1249 


•37-1787 


•37-1787 


37-1787 


38-1787 


38-1787 




54-2004 


54-2005 


54-2006 


54-2007 


54-2008 


54-2009 


54-2010 






54-2013 


54-2014 


54-2015 


54-2016 


54-2017 


54-2018 


54-2019 






54-2022 


54-2024 


54-2025 


54-2026 


54-2027 


54-2028 


54-2029 






54-2032 












SERRTB 


001320 


#21-1249 


39-1807 










1 1 0-4609 


KRTTL 


001112 


#20-1249 


•37-1787 


38-1787 


38-1787 


110-4609 


110-4609 



20-1249 
20-1249 

20-1249 
20-1249 



20-1249 
20-1249 



39-1880 
54-2011 
54-2020 
54-2030 



20-1249 
20-1249 

20-1249 
20-1249 



20-1249 
20-1249 



39-1872 40-''882 



38-1 787 



54-2003 
54-2012 
54-2021 
54-2031 
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SEQUENCE 162 












C YMQni 


TRDC^ RFFFRFIurF 
LnUjJ nC"C"t'»Lt 








rCFF Un1 
LnCr VU 1 












C VMOni 

J ' nowL 


V/AI 1 IF 


RFFFBFMfF 


5 


















UU 1 C 1 C 


*50-154Q 

WCv 1 C"* T 


•3^-1 78S 


T7-1 787 


77-1 787 
Jf — 1 f Of 


38-1787 

JW 1 > Of 


38-1787 

JO 1 f Of 


♦S8-7106 

"JO C 1 vO 










Jf?0-1 PCQ 

WCv t C*»T 






















1 CHO 


f9Cv 1 tH7 
















IF ATAl 


1 ecu 


WCV 1 C**7 


*^^*190^ 

*HH 1 Tv"t 
















IFFl r< 

»r r 




*44-1 Q04 


^■f*t 1 7v" 


A A - 1 QOZ. 

H — 1 TVH 




#44-1 904 

If "t" 1 7V~ 










9r i LLC 


WV 1 1 JO 


*50-19AQ 

»Cv i CHt 


43-1903 


A7-1 007 
H J- 1 yuj 


Z.7— 1 007 
•» J— 1 tUj 












IF I M ^ 
• " J LL d 


001 1 


•cv ICHt 


43-1903 

•f J 1 7vJ 


Z,7-1 007 
Hj— 1 tUj 
















001 1?0 


»CV 1 CHT 


















innnAT 


001 1 Pi 


»CV 1 CH7 


















IHFT^? 

»V>C 1 *♦£ 




1 10-4^09 

1 1 V "tUVT 


1 io-^^,nQ 

1 1 V •♦WV7 


#1 1 0-A/kOQ 
* 1 1 U hOvT 


















•HV 1 OOC 


SO-1910 

J\J 1 7 1 V 


^0-1 01 0 
jU 1 t 1 U 
















= 000000 

UvWvV 


15-1 195 


15*1195 


1^-110^ 














991 i O 1 O 


OOOPOi 


tflQ.lpAO 


















TMT 
• i LI 1 


0011 OA 

Vv 1 1 VH 


V 1 CHT 


















III 1 ItP 

* 1 L L \Jr 


Vv' H JC 


^1-1Q1 1 


S1-1911 


If J 1 — 1 T 1 1 














itNTAr: 

9 i ni 1 n\j 


001 1 

UV 1 1 ^ J 




40-1flfl7 

HV 1 OOC 


AO-1 885 

H\J 1 OOC 


Z,n-1 885 
hU 1 OOC 


40-1887 

H V 1 OOC 










91 1 cno 


001 1 1i 

vV 1 1 1 H 


JfPO-IPAQ 


*'?7-17ft7 

^ Jf I f Of 


77-1 787 

jf \ f of 


77-1 787 

Jf I f of 


•37-1787 


37-1 787 

J f 1 f O f 


78-1 787 

JO 1 f Of 


70-1 787 

JO 1 f O f 


7Q.1 797 

J— 1 f yc 


tl F 

PL" 


001 555 


#5o-1P40 

V 1 t T 


7a_i 787 

JO 1 f Of 


78-1 787 


A0-18S7 
hU I OOC 


40-1 8A? 

*tv 1 vOC 


40-1887 

H V 1 OOC 


43-1903 

H J 1 7vj 


4^-1903 

H J 1 7VJ 




Fl 


00^7^1 


■ 1 TV"* 


#44-1904 

1 7v" 
















ti nop 

9LlAir 


VJO^C V 


1 10-4^09 


#1 10-4609 

1 1 V "tOv 7 
















<l PADR 


001 1 0^ 

vv 1 1 Vw 


#70-1749 

WCV 1 CHT 


*36-l785 

1 r OJ 


*7A-1 78^ 


JO 1 f OJ 


36-1785 

JO 1 ' OJ 


36-1785 

JO 1 ' OJ 


♦58-7106 

"JO C 1 vO 






ll PFRR 


001 110 
vv 1 1 1 V 


#70-1 749 

WCV 1 c"* — 


^6-1785 


*7A-1 78^ 

■ jO 1 f OJ 


7A— 1 78^ 

jO 1 f o5 


36-1 7RS 

JO 1 ' OJ 


77-1787 

J f 1 f O f 


"JO CI VO 


♦60-7166 
"Ov c 1 oo 


♦X1-5577 

"O 1 CCji 






*/!>7-779S 
"oc ccyj 


*64-7^61 


"OS c jOj 


5771 
"Oh— CJf 1 


*65-7437 

"OJ CHJC 


♦65-7436 

"OJ CHJU 


*^^5-P44P 
"OJ c*»*»c 


♦66-7S08 

"oo CJvO 


♦67-7S48 

"Of CJ—O 






*67-7557 


*67-7566 


*A8-5A7A 
"Oo— cOj*« 


*AQ— 5A0Q 
"Ot cOtt 


♦70-7735 

* f V CfJJ 


♦71-7787 

" * 1 C ' O t 


" r J COOc 


♦7^-7886 
" f J cooo 


♦7^-789^ 

" f J coy J 






*77.7909 

^ t J C 7V7 


* 73-7970 

* * J £ 7C V 


*77-P071 

" f J CTJ 1 


*77-70A0 

" f J CTHV 


♦73-7950 

" * J C 7 J V 


♦73-7960 

" f J C TOV 


*7^-P971 

" f J C 7 r 1 


♦73-7980 

" f J C 70v 


*77-79BO 

" f J C 70t 






♦74-3077 

■ f "f ^VCC 


*74-3036 

" r "t JV Jw 


*7A-70A7 


*7A-708A 
"f H jUOO 


♦74-3098 

" f H J V70 


♦74-3107 

" f H J 1 V f 


♦74-3174 

" » *t J 1 C"t 


♦74-31 34 

" f H J 1 JH 


♦74-^148 

f H J 1 HO 






*74-31 5R 


*74-3168 


*7^-7188 

" fj J 1 oo 


*7S-7?07 


♦75-3709 

* f J JCVT 


♦75-3718 

" f J JC 1 o 


♦75-3777 

" f J JCC f 


♦76-3744 

" f O JCHH 


* f O JC Jo 






*7f>-37AS 

" r U ^CO'' 


*76-^?74 


*7A-77a5 
0 JCoc 


♦77—7701 
• f f J jU 1 


*7Q.77A8 

" f y J joo 


♦79-3384 

* f 7 JJOH 


♦81-^468 

"O 1 JHOO 


♦81-^48^ 

"O 1 JHO J 


"O J J JO J 








*RS-3769 

" O J J f O 7 


♦ a'>-7707 

"OJ Jf 7C 


*87-78CO 

"Of jo5t 


♦87-3883 

"Of JOOJ 


♦89-3974 

"O 7 J 7 f 


♦91-40^6 

7 1 H vJO 


♦9^-4086 

"7J HVOO 


"TO H 1 O J 






*9R-4748 


*10S-4417 
















9rv% i L 


001 ??c 

vv ICC** 


19-1748 


19-1748 

1 7 1 C"*0 


#70-1 740 

»CU 1 CS7 


76-178'; 
jO 1 f OJ 


37-1 787 

Jf 1 f of 


43-190^ 

H J 1 7VJ 


^8-7106 

JO C i vO 


S8-7107 

JO C i vf 






OOOPOft 

vvvC vO 


#19-1748 


















IMFI ^ 




*44-1904 


44-1904 

■t~ 1 7V~ 


"•••»— 1 TUH 


#44-1 QOA 

*•»•»— 1 7VH 












*T Hit. ■ 


\J\JJC f 1 


40-1887 

H V 1 OOC 


#40-1887 

• ■f V 1 OOC 
















SMSGAD 


001 ?40 


#70-1749 

C V 1 t 7 


*44-1904 

1 7V~ 


OOA 
















001 P4? 

vv 1 C"VC 


fV£ V 1 C~ ' 


*44-1904 

"■♦■t 1 7V"f 


















001PPA 
UV } cc^ 


ft V 1 7 


1 7V" 


*44-1 904 

"HH 1 TvH 


HH 1 TVlH 


♦44-1904 

" ■♦"f 1 7V"f 










9r}own 


OOSP^iO 


■♦V 1 OOc 


f V 1 OOC 
















•riAL>» i 


001^06 

vv 1 JvU 


#70-1749 

fV C V 1 C" 7 


















#*vWL.L 


001 1 54 

WV 1 1 J~ 


#70-1 749 

" C V 1 C** 7 


43-1903 

•t J 1 7v J 


A7-1007 


A7-1 007 

H J 1 TU J 














= 000001 

VVVVV 1 


#59-7150 


59-P150 

J 7 CI JV 


wOU-c 1 jy) 


AO-51 "JO 
OU-c 1 jU 


#60-7776 

Wiv CCCO 


60-7776 
ov ccco 


#61-7?76 

•O 1 ccco 


61-7776 

O 1 CCCU 


*0 1 CC 






U 1 C C 7*t 


ifAP-PP9A 

fVOC CC7»t 


iL5-550A 
OC CC7'» 


«A7-57CA 
#Oj C J JH 


OJ CJJ*t 


#64-7354 


64-7354 

OH CJJH 


#64-7477 

• OH CHC f 


OH CHC' 








^^5-PAP7 

OJ cHc r 


#05 c jUU 


Oj-c JvU 


fOO CJVV 


66-7S00 

UO CJVV 


#66-7^44 

•oo CJHH 


66-7<;44 

oo C JHH 


f Of CJHH 








for COJC 


A7-5A75 
Of -cOjC 


#A8-5A75 
wOO-cO JC 


OO COJC 


#68-7697 

•oo COTf 


68-7697 

oo CU7f 


#69-7697 

•07 COTf 


07 C07f 








O 7 C( Cr 


#70-5770 


70-7770 

iMCf C7 


Jlf70-P777 


70-7777 

f V Cfff 


#71-7777 

If f 1 C f ' ' 


71-7777 

f 1 Cfff 


f f C COJC 






72-2852 


f r J CO Jl 


77-78<;7 
f J COJC 


#77-7008 
# f J jUUO 


77_7008 

f J JVvO 


#74-7008 

• f H JVvO 


74-^OOA 

f *♦ JvvO 


#74-^186 

• f H J 1 OO 


f H J 1 OO 






#75-318^ 
77-3799 


r J J 1 OO 


#7^-77A5 


7C_75/ 5 

f J JCHC 


#76-374? 

• f O JCHC 


76-374? 

f O JCHC 


#76-3799 

f f O JC 77 


76-3799 

f O JC 77 


#77-^P99 

ff f f jc tt 






#78-3359 

W f O J J J 7 


78-7X^0 


#70-77'>0 

n f y jjjy 


79-3359 

f 7 J J J 7 


#80-346? 

*fOv J*tOC 


ou jHOC 


#81-3467 

• O 1 JHOC 


V 1 JHOC 






#87-3SA^ 

•oc ^JuJ 


OC jJoJ 


#83-3563 


83-3563 

OJ -j-Jvj 


W O J JO J r 


OJ JKJJf 


WOH JOJf 


84-3657 

OH JOJf 


wOH Jf OO 






84-3768 


#85-3768 

fVOJ Jf OO 


85-3768 


#86-3858 


oo JOJO 


"Of JOJO 


87-^fi58 

Of JOJO 


#88-3967 

frOO J7wC 


88*^96P 

oo J70C 






#89-3962 


89-3962 


#90-4033 


90-4033 


#91-4033 


91-A033 


#92-4081 


92-4081 


#93-4081 






93-4081 


#94-4139 


94-4139 


#95-4139 


95-4139 


#95-4169 


95-4169 


#96-4169 


96-4169 
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SEQUENCE 163 

SvHBOL CROSS REFERENCE CREF VOI 



SYMBOL 


WALUE 


REFERENCES 










QQ— z, ?nn 

77— H jUU 


M^ AA-Z.7AA 
m 1 uU H jUU 


1 AA-z. 7nn 

1 UU-H jUU 


JII AA-Z. ?37 
• 1 UU H JC3 






M A 7 / 1/ A 


A7 / 0/ A 

97-4240 


#98-*i2*»U 


QB— z. 5/.n 


ifOQ- /. TAA 

1 A1 -/.7£A 
1 U 1 — hjhO 








i A A / 7 T T 

100-4323 


«1 A1 _/ X'iX 

#101-4323 


101-*»3c3 


• 1 A1 -A7Z,A 


J»1 A3— Z.7AA 
If 1 Uc H jHO 


1 A3-Z. 7/. A 
1 Uc H jHO 


«1 n'>-Z,7AQ 
• 1 Ut H jOt 


1 A3-Z, 7AO 
1 UC H jOt 








#103-4369 


1 A7 y 7XQ 

103-4307 


«1 A7_Z 7Q5 

#103-h39c 


1 AZ— /. Z09 
lU3-«i39c 


#104-4392 


104-4392 


ifl AC-Z.C1 7 
If 1 U3 H3 1 f 


1 AC-/.C1 7 
IU3 h3 1 f 


ifl AA-Z,C1 7 
• 1 UO HJ 1 f 








4 AZ / C i 7 

106-451 7 


tf 1 A^ y C7C 

#106-4535 


1 f\i.—l C7C 

106-«»535 


«1 A7_ACTC 
m lOf h533 


1 A7-AC7C 


If 1 Uf — h33 J 


1 A7-/.CC7 
lUf hSSj 


ifl AB_/CC7 
If lUO h3 J 3 


1 Afl-/,CC7 

1 UO H J J J 








#108-4567 


108-4567 


«i AA / ex. 7 

#109-^567 


1 AO—/ CA7 

1 09-«»56f 












tOCNT 






^ / ^ i OA^ 

•46-1 V06 


•«t6-1 7U6 


•/ A—l OA<t 
•HO— 1 tUO 














»UC TVL 




0071 '0 


4t- 1 yiry 








•^A-1 OAA 
■HO 1 7vO 


WHO 1 7UD 








lOMOOE 




006544 


•46-1 706 


•»(6-l7U6 


46-1906 


■hO 1 7UO 








SOVER 






7^ i 70C 

56-1 785 


7iL_1 7BC 

36-1 785 


1 7BC 
30- 1 fOJ 


w jO 1 f Oj 








1 1 w HOv7 


1 10»£A09 

1 1 V HOw— 


•PASS 




Art ^ T T T 

001232 


#2U-1 iHT 


H 1- 1060 


*CA»71 AA 
■50— c 1 UO 


*ii n-^AOo 


■ 1 1 V HOv7 


1 Iv HOw7 


1 1 V HOWy 


IPASTM 




AAA Til 

000212 


#19-1248 


















JPWRAD 




OOf^t 34 


#51-1 Vl 1 




CB— 71 AiL 
30— C lUO 














SPURDN 




OOr 2r4 


«C 1 _1 Q1 1 


5 1— ITI 1 














SPWRMG 




AA7/ lA 


«C 1—1 Q1 1 

#51-1 Vl 1 






















AA7T/ 


CI — 1 01 1 
5 1 - 1 7 1 1 


nj 1 — 1 7 1 1 










/A-1 BB7 
HU 1 OOC 


H J— 1 7UJ 


H J 1 ▼vJ 


•QUE 5 






#20-1 <:*i7 


7B_1 787 

38-1 787 


7fl— 1 7fl7 
38- 1 fof 


•»U- 1 00c 


/ A-1 005 
HU 1 OOc 


/A-1 007 
HV/— 1 OOc 


•HDCHR 




AA/ ^ TA 

004630 




CA— 1Q1 A 


CA.IQI A 

5U— 1 7 1 U 














SRDDE C 




****** 


CA iAIA 

50-1910 


















SRDLIN 




004 760 


M/ A 1 OQO 

#40-1082 


50"l7lO 


CA_1 01 A 
30— 1 7 10 














SRDOCT 




****** 


C A 1 Ai A 

50-1 VI 0 


















SRDSZ 




AAAA i A 

000010 


#40-1882 


/ A_1 SB? 

40-1 882 
















SREGAD 




AA1 i ^A 

001 loO 


#20-1249 










C/.-3A1 1 
3H— cU 1 1 




3H CUCC 


3H— CUcH 


SREGO 




AA1 1^0 

001 IOC 


M^A 1 0/ A 

#20-1 «:4V 


«77_1 707 

•37-1 (of 


C/ — ?AAB 
5h-cU08 


5*»-cUUV 


CZ.-7A1 A 


CZ,-3A1 A 
3H— cU 1 0 




5*i-c025 


C/. — 7A7B 
5'1-cUtO 


CZ-5A71 

JH cOj 1 












JH CUCH 


»RcG 1 




AA1 1 Z/. 


«0A-1 5ZQ 

#20-1 c*»T 


,77.1 707 
• Jf — 1 ( Of 


5*»-cU 1 c 


JH— Cv 1 J 


C/_0A1 A 
JH— cU 1 0 


JH— Cw 1 ' 


JH^CvCv 


JH CvC 1 




5*»-cUc5 






















AAI 1 J. J. 

uu 1 100 


«7A.1 5Z.0 
mc\J 1 CH7 


*'^7-1 7R7 
*jr — 1 f Of 


JH— c vU J 


JH— CvUO 


'\L~7C\C\7 
JH Cvvr 


JH CV 1 V 


S4-?01 S 

JH CV 1 J 


S4-P0P0 

JH CUCv 


JH CUCJ 


cor 7 




AAI 1 7A 

UUl 1 f\J 


«7A— 1 5ZO 


•77-1 7fl7 
■3f 1 r Of 


CA-5AAi« 


C/_PA1 1 
3H CW 1 1 


54-2017 


s^-3n?o 

jH-cUCw 


jH cvCi 






CDC ^ / 

»Rt6A 






#<:U-l 


•77.1 7fl7 
• Jf — 1 f of 


CZ,»5nA7 


J*» cuuo 


JH— CUU7 


JH— CU 1 U 


JH— CU 1 1 






CDC ^ C 






llc\)~^ 1 C*»7 


*77-1 7fl7 

"Jf — 1 fof 
















#DC CDC 

SHE SHE 




AA7A7n 


«Z S_ 1 OAB 
**»0 I tUo 


CA— 1 01 A 
5U— 1 7 1 U 
















SRTNAQ 




0j63£C 


• 1 1 U— •»6Ut 








#11 A— Z, AAQ 
m 1 1 U H0U7 










SRTRN 




036316 


CO OlAi^ 

58-2106 


• CB-.71 Ait 
•58-c1 06 


aCB—DI AA 
•50-C IU6 












SR2A 




****** 


C A— 1 0 1 A 

50-lVlO 


















SSAVRE 




006 7 72 


mi Q 1 QAQ 

#48-1908 


50-1910 


CA— 1 Q1 A 
50-1910 


*C1 -1 Q1 1 
•5 1 - 1 7 1 1 


«C1-101 1 

If J 1 — 1 T 1 1 










SSAVR6 




007456 


*51-l7l 1 


CI _1 Q1 1 

51-191 1 


*C1— 1 01 1 
•31-1 91 1 










•SCOPE 




00304 


#36-1 785 


CB_01 nA. 
58-21 06 










#16-1245 


16-1245 


#16-1245 


# r- p Ti m 

JScTUP 




AAAI 77 

0001 37 


#16-1245 


1iL._1 5Z C 

16-1 2*»5 


M^ A— 1 5AC 
» 1 0 1 c*»5 


1 A-1 OL C 
1 0- 1 CH 5 


M^ A-1 

If 1 0 1 CH J 


16-1245 




16-12^5 


#16-1c*»5 


1 A— 1 oz. c 
1 6- 1 c'*J 


*1 A-1 2Z.C 
* 1 0- 1 C«»5 


7A-1 7BC 
jO- 1 f 05 


77-1 7*7 

3' 1 ' Of 


77-1 7R7 

jf 1 f Of 


77-1 787 


77-1 7R7 

3f 1 » Of 








/ A_1 BQ7 

40-1882 


/ A-.1 BB? 

hU-I 88c 


CI —1 01 1 

5 1-17 1 1 


Cfl— 71 AA 
50c 1 UO 


CS-51 AA 
JO c 1 UO 


CO-PI OA 
JO c 1 UO 


JO c 1 UO 


JO C 1 UO 


JO C i vO 








50 £ 1 UO 


JO C 1 vO 


CO-71 A/L 
30 c 1 UO 


jO c 1 wO 


JO C 1 UD 


SR-710A 

JO C 1 UO 


Cfl.31A7 

JO C 1 Uf 


Cfi.31A7 
JO C 1 VI 


JO C 1 Vf 








1 1 A—/ X.AQ 

1 10-4607 


1 1 A— Z AAQ 
1 1 U-HOU7 








1 A-1 
16- 1 ch3 


*1 A— 1 3Z,C 
w 1 0 1 Ch3 


^^^ A— 1 3Z.C 
If 1 6 1 Ch3 


1 A-1 3Z.C 
1 0 1 Ch3 


SSTUP 




1 ffff ( 


«i ^ 1 0/ c 
#16-1245 


mA A 1 / C 

#16-1245 


1 A. 1 0/ C 
16-12h5 


«1 A_1 0/ C 

#1 6-1 2*i5 


•1 A-1 7/ C 

#1 6" 1 ch3 






#16-1 245 


«i ^ 1 0/ c 
#16-12^5 


1 A. 1 0/ c 
16-1 245 


• 1 A— 1 c 
#16-12«»5 


• 1 A— 1 7AC 

* 1 6 1 ch3 


1 A— 1 3Z,C 
1 0 1 ch3 


«1 A-1 
•16 Ich3 


«1 A-1 3AC 
•10 Ich3 


1 A-1 3Z.C 
1 0 1 ch3 


SSVLAO 




AA 7^1^ 

0032 16 


7^ 1 70C 

36-1 785 


7iL 170C 

36-1 785 


«7A— 1 7flC 

#36-1 785 














$SVPC 




AAAOA/ 

000204 


«i 0 1 7 
#18-1247 


10 10/7 
18-1247 








1 C-1 1 OA 
1 3— 1 1 70 


1 C-1 1 OA 

13 11 70 


1 C-1 1QA 

1 3 1 1 70 


1 ^-1 1 OA 

1 3 1 1 TO 


SSUR 




1 73400 


«1 C i 1 07 

#1 5-1 183 


1 C_1 1 QC 

1 5-1 195 


1 C_1 1 QA 

15-1 196 


1 C — 1 1 OA 
15-11 76 


1 C-1 1 OA 
15-11 76 




'. 5-119<^ 

1 J II 7U 


P0-1P49 


5A-1 ?AQ 

CV 1 CH 7 


20-1 ?49 


36-1785 


36-1785 


36-1785 


36-1785 


36-1785 








36-1785 


36-1785 


36-1785 


36-1785 


36-1785 


36-1785 


36-1785 


36-1785 


36-1785 








36-1785 


36-1785 


36-1785 


36-1785 


36-1785 


36-1785 


37-1787 


37-1787 


37-1787 








37-1787 


37-1787 


37-1787 


37-1787 


37-1787 


37-1787 


38-1787 


38-1787 


51-1911 








58-2106 


58-2106 


58-2106 


58-2106 


58-2106 


60-2150 


61-2226 


62-2294 


64-2354 



CREATED BY MACRO ON 12-JAN-82 AT 



SYMBOL CROSS REFERENCE 
■)>MBOL VALUE 



tSUREG 
tSURMK 



ST8IT 

ITESTN 

STKB 

STKS 

STHPO 



STMPI 



$THP2 



$TMP3 

$TMP4 
$TMPS 
STN 



$TP8 

STPFLG 

SIPS 

STRAP 

SrRAP2 

fTRP 



001246 
000000 



001310 
001230 
001 U6 

001 U4 
001176 



001200 
001202 

001204 

001206 
001210 
000046 



001152 
001157 
001150 
007206 
007230 
= 000015 



REFERENCES 

65- 2427 
75-3186 
89-3962 
103-4369 
110-4609 

#20-1249 
15-1196 
36-1785 
36-1785 
#20-1249 
#20-1249 
#20-1249 
43-1903 
#20-1249 
43-1903 
#20-1249 
54-2029 
*67-2571 
•109-4582 
#20-1249 
•67-2590 
109-4585 
#20-1249 
81-3516 

84- 3716 

85- 3837 
#20-1249 
•109-4587 
#20-1249 
#20-1249 
#15-1184 

62-2294 

66- 2500 
69-2697 
72-2852 
75-3242 
79-3435 
83-3657 
87-3858 

#91-4033 
95-4169 
100-4300 
#102-4346 
105-4517 
108-4567 
#20-1249 
#20-1249 
#20-1249 
#50-1910 
#50-1910 
#50-1910 
50-1910 



12:24 PAGE 16 
SEQUENCE 164 

CREF V01 



66- 2500 
76-3242 
91-4033 
104-4392 
110-4609 
58-2106 
15-1196 
36-1785 

•51-1911 
•36-1785 
40-1882 
43-1903 
40-1882 
43-1903 
•32-1681 
54-2031 

67- 2578 

•32-1682 
•67-2595 

54-2013 
•81-3529 
•84-3717 
•87-3913 
•100-4303 
109-4594 
•39-1855 
•39-1856 
15-1195 
#62-2294 
#66-2500 
#69-2697 
73-2852 
76-3242 
80-3462 
84-3657 
#87-3858 
91-4072 
96-4169 
#100-4300 
102-4360 
106-4517 
109-4567 
43-1903 
43-1903 
43-1903 
58-2106 
50-1910 
50-1910 
#50-1910 



67-2544 
77-3299 
93-4081 
106-4517 



15-1196 
36-1785 

•58-2106 

39- 1880 

40- 1882 

40-1882 
43-1903 
32-1693 
54-2032 
•71-2802 

32-1694 
•67-2599 

•67-2572 
81-3530 
84-3721 
87-3914 
100-4307 

39-1857 
•41-1886 
59-2150 
63-2354 
66-2544 
69-2715 
#73-2852 
#76-3242 
81-3462 
#84-3657 
87-3935 
92-4081 
#96-4169 
100-4314 
102-4369 
#106-4517 
#109-4567 
43-1903 
43-1903 
43-1903 



50-1910 
50-1910 



68-2632 
79-3359 
95-4139 
107-4535 



15-1196 
36-1785 



13 



69-2697 
81-3462 
96-4169 
108-4553 



15-1196 
36-1785 



•110-4609 110-4609 



40-1882 

40-1882 
43-1903 
32-1700 
•60-2169 
•71-2808 

32-1701 
67-2600 

67-2581 

83- 3620 
•84-3734 
•87-3927 
•101-4326 

•109-4588 
•41-1887 
60-2150 
64-2354 
67-2544 
69-2729 
73-3008 
76-3299 
#81-3462 

84- 3742 
88-3962 
93-4081 
96-4216 
100-4323 
103-4369 
106-4535 

43-1903 
43-1903 
43-1903 



50-1910 
50-1910 



40-1882 

40- 1882 

54-2005 
60-2199 
•71-2812 

54-2032 
•70-2742 

•79-3414 
•83-3621 
84-3736 
87-3928 
101-4330 

109-4593 

41- 1893 
#60-2150 
#64-2354 
#67-2544 

70-2729 
74-3008 
77-3299 
81-3536 
84-3768 
89-3962 

#93-4081 
97-4240 
101-4323 

#103-4369 
107-4535 



70-2729 
83-3563 
98-4240 
109-4567 



15-1196 
36-1785 

110-4609 

40-1882 

40-1882 

54-2006 
60-2204 
•71-2815 

•67-2568 
•70-2748 

79-3415 

83- 3625 

84- 3739 
•109-4590 
•102-4349 



•109-4589 
60-2226 
64-2427 
67-2632 

#70-2729 

#74-3008 

#77-3299 
82-3563 
85-3768 

#89-3962 
93-4122 
98-4240 

#101-4323 
103-4382 

#107-4535 



71-2777 
84-3657 
100-4300 
110-4609 


73-2852 
85-3768 
101-4323 
110-4609 


74-3008 
87-3858 
102-4346 
110-4609 


15-1196 


15-1196 

JO I » OJ 


15-1196 


40-1882 


43-1903 


43-1903 


Hv 1 OOC 


H\J— 1 ooc 


Hv 1 OOc 


54-2007 
•71-2819 


54-2013 
71-2820 


54-2018 

O 1 CCI J 

•105-4483 


•67-2580 
•70-275? 


•67-2583 
70-2753 


67-2584 
•109-4578 


•79-3428 
•83-3638 
•85-3822 


79-3429 
83-3639 
85-3823 


•81-3515 
83-3642 
•85-3836 


102-4353 


•103-4372 


103-4376 



109-4592 

61-2226 

65-2427 

68-2632 

70-2777 

74-3186 

78-3359 

83-3563 

#85-3768 
89-4005 
94-4139 

#98-4240 
101-4337 
103-4392 
107-4553 



#61-2226 
#65-2427 
#68-2632 
71-2777 
75-3186 
79-3359 
#83-3563 
85-3845 
90-4033 
95-4139 
98-4280 
101-4346 
104-4392 
108-4553 



61-2294 
65-2500 
68-2697 
071-2777 
#75-3186 
#79-3359 
83-3645 
86-3858 
91-4033 
#95-4139 
99-4300 
102-4346 
#104-4392 
#108-4553 



50-1910 
50-1910 



#50-1910 
50-1910 



50-1910 
#50-1910 



50-1910 
50-1910 



50-1910 
50-1910 



CKKTBD 



CREATED Br MACRO ON 12-JAN-82 AT 



SYMBOL CROSS REFERENCE 
SYMBOL VALUE 



STRPAD 




007242 


ITSTM 




000210 


STSTNM 




001102 


STTYIK 




005236 


STVPBN 




006244 


STYPDS 




006546 


STYPE 




005432 


STYPEC 




005644 


STYPEX 




005774 


ITVPOC 




006544 


STVPON 




006360 


STVPOS 




006320 


SUNIT 




001236 


•UNim 




AAA01 Z 


SUSUR 




001250 


SXOFF 




000023 


SXON 




000021 


SXTSTR 




003054 


SSGET4 




000001 


SOFILL 




006543 


J40CAT 




****** 


.SASTA 




•*•*•* 


.SX 




000204 



REFERENCES 
50-1910 
50-1910 
50-1910 
#50-1910 
50-1910 
50-1910 
#19-1248 
#20-1249 
37-1787 
40-1882 
#45-1905 
#47-1907 
#43-1903 
40-1882 
43-1903 
#46-1906 
46-1906 
#46-1906 
#20-1249 
#19-1248 
•,20-1249 

43- 1903 
40-1882 

#36-1785 
#110-4609 
•46-1906 
36-1785 

44- 1904 
#19-1248 



50-1910 
50-1910 
50-1910 
50-1910 
#50-1910 
#50-1910 

36-1785 
38-1787 
40-1882 
50-1910 
50-1910 
44-1904 
43-1903 
43-1903 
50-1910 
#46-1906 
50-1910 



43-1903 

43- 1903 

#110-4609 
•46-1906 
37-1787 

44- 1904 
19-1248 



12:24 PAGE 17 
SEQUENCE 165 

CREF V01 



#50-1910 
50-1910 
50-1910 
50-1910 
50-1910 



36-1785 
38-1787 
40-1882 
50-1910 
50-1910 
50-1910 
43-1903 
43-1903 
50-1910 
50-1910 



50-1910 
#50-1910 
50-1910 
50-1910 
50-1910 



•36-1785 
41-1889 
40-1882 



50-1910 
43-1903 
#43-1903 



J 13 



50-1910 
50-1910 
#50-1910 
50-1910 
50-1910 



43-1903 43-1903 
110-4609 

46-1906 #46-1906 



50-1910 
50-1910 
50-1910 
#50-1910 
50-1910 



50-1910 
50-1910 
50-1910 
50-1910 
#50-1910 



#50-1910 
50-1910 
50-1910 
50-1910 



50-1910 
#50-1910 
50-1910 
50-1910 



36-1785 
•110-4609 
40-1882 #40-1882 



#43-1903 



36-1785 36-1785 36-1785 37-1787 



MACRO CROSS 
MACRO NAME 
COMMEN 
ENDCOM 
ESCAPE 
GETPRI 
GETSUR 
MES350 
MES351 
ME S 352 
MES353 
MES35A 
MES355 
MES356 
MES357 
MSG30 
MSG31 
MSG31A 
MSG32 
MSG33 
MSG3A 
HSG35 
MSG36 
MSG36A 
MSG37 
MSG40 
MSGAOA 
MSGAOe 
MSGAOC 
nSGAOD 
MSG40E 
MSG41 
MSGA1A 
MSGA2 
MSGA3 
MSGA3A 
MSGAA 
MSGAS 
MSGA6 
MSGA7 
MULT 
NEWTSr 



POP 

PUSH 

REPORT 

SAVR 

SETPRI 

SETTRA 

SETUP 
SKIP 



#108-A562 #109-A567 



CREATED BY MACRO ON 12-JAN-82 AT 12 

REFERENCE 

REFERENCES 
#15-1197 
^15-1197 
#15-1197 

#15-1197 110-A609 

#15-1197 #58-2107 58-2107 
#99-A293 100-A300 

#100-4316 #101-4323 
#101-A339 102-4346 

#102-4362 #103-A369 

#103-4384 #104-4392 
#105-4509 106-4517 

#106-4527 #107-4535 

#107-4545 #108-4553 
#59-2142 60-2150 

#60-2218 #61-2226 
#61-2283 62-2294 

#63-2343 #64-2354 
#64-2416 65-2427 
#65-2487 66-2500 

#66-2531 #67-2544 
#67-2619 68-2632 
#68-2691 69-2697 

#69-2718 #70-2729 

#70-2763 M7^'2777 

#76-3291 #77-3299 
M72'2S17 73-2852 

#73-2998 #74-3008 

#74-3178 #75-3186 
#75-3234 76-3242 

#78-3345 #79-3359 
#80-3448 81-3462 

#82-3549 #83-3563 #84-3657 

#84-3754 #85-3768 #87-3858 
#88-3948 89-3962 

#90-4019 #91-4033 #93-4081 
#94-4131 95-4139 

#95-4156 #96-4169 
#97-4229 98-4240 
#15-1197 

#15-1178 #15-1197 #59-2150 

#68-2697 #69-2729 #70-2777 

#82-3563 #83-3657 #84-3768 

#99-4300 #100-4323 #101-4346 

#15-1197 #44-1904 #44-1904 
#15-1197 44-1904 44-1904 
#15-1197 

#15-1166 #37-1787 
#15-1197 

#50-1910 50-1910 50-1910 
50-1910 50-1910 50-1910 
#15-1197 58-2106 
#15-1197 69-2715 79-3435 



24 PAGE 18 
SEQUENCE 166 

CREF VOI 



K 13 



#60-2226 
»72'2BS2 
#86-3858 
#102-4369 
#47-1907 
44-1904 



#61-2294 
#73-3008 
#88-3962 
#103-4392 
#48-1908 
47-1907 



#63-2354 
#74-3186 
#90-4033 
#105-4517 
#51-1911 
48-1908 



#64-2427 
#75-3242 
#92-4081 
#106-4535 
#51-1911 
51-1911 



#65-2500 
#76-3299 
#94-4139 
#107-4553 

51-1911 



#66-2544 
#78-3359 
#95-4169 
#108-4567 



#67-2632 
#80-3462 
#97-4240 



50-1910 50-1910 50-1910 50-1910 50-1910 50-1910 50-1910 
81-3536 83-3645 84-3742 85-3845 87-3935 89-4005 91-4072 



MACRO CROSS 
MACRO NAME 

SLASH 
SPACE 
STARS 



CREATED tif MACRO ON 12-JAN-8^ A" 12 



SURSU 

TRMTRP 

TYP8IN 

TYPOEC 

TYPNAW 

TYPNUM 

TYPOCS 

TYPOCT 

TVPTXT 

USER 

SSCMRE 

$$CHTM 

SSESCA 

SSNEUT 



$$SET 

SSSETH 
SSSETU 
SSSKIP 

.EQUAT 
.EQUIV 



.HEADE 

.ICT11 

.SETUP 

.syRHi 

.SMLO 
.SACT1 



REFERENCE 

REFERENCES 

93-4122 
#15-1197 
#15-1163 
#15-1197 
28-1569 
33-1706 
43-1903 
56-2045 
62-2294 
67-2544 
73-2852 
78-3338 
85-376S 
95-4139 
101-4323 
103-4369 
107-4535 
110-4609 
#15-1197 
#50-1910 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1197 
#15-1223 
#19-1249 
#19-1249 
#15-1197 
#15-1178 
#68-2697 
#82-3563 
#99-4300 
#50-1910 
#50-1910 
#58-2106 
#58-2106 
#15-1197 
93-4122 
#15-1178 
#15-1160 
#15-1197 
#15-1197 
#15-1206 
#15-1178 
#15-1178 
#15-1178 
#15-1178 
#15-1196 
#15-1179 



:24 PAGE 19 

SEQUENCE 167 

CREF V01 



L 13 



96-4216 

#15-1197 
18-1247 
28-1580 
33-1721 
44-1904 
56-2052 
62-2294 
67-2544 
73-2852 
78-3343 
85-3768 
95-4139 
101-4323 
103-4369 
107-4535 



98-4280 



19-1248 

29-1609 

34-1749 

45-1905 

57-2071 

63-2327 

68-2632 

74-3008 

79-3359 

87-3858 

96-4169 

101-4323 

104-4392 

107-4535 



100-4314 101-4337 102-4360 103-4382 



19-1248 

29-1616 

34-1764 

46-1906 

57-2078 

63-2342 

68-2632 

74-3008 

79-3359 

87-3858 

96-4169 

101-4323 

104-4392 

107-4535 



#58-2106 #58-2106 



110-4609 
#58-2107 



40-1882 
58-2108 
20-1249 
20-1249 
20-1249 

#15-1197 
#69-2729 
#83-3657 
#100-4323 
#50-1910 
#50-1910 
58-2106 
58-2106 
69-2715 
96-4216 
15-1197 
#15-1177 
#15-1197 
#15-1197 
#15-1207 
15-1195 

15- 1198 

16- 1245 
15-1196 

#17-1247 



110-4609 



110-4609 110-4609 



20-1249 
20-1249 

#59-2150 
m-277? 

#101-4346 

#50-1910 

#50-1910 



79-3435 
98-4280 

#15-1197 
#15-1197 
#15-1197 
#15-1208 



20-1249 
20-1249 

#60-2226 

#72-2852 

#86-3858 

#102-4369 

#50-1910 



81-3536 
100-4314 

#15-1197 
#15-1197 
#15-1197 
#15-1209 



19-1248 

30-1627 

36-1785 

47-1907 

59-2130 

64-2354 

69-2697 

75-3186 

81-3462 

89-3962 

98-4240 

102-4346 

104-4392 

108-4553 



20-1249 
20-1249 

#61-2294 

#73-3008 

#88-3962 

#103-4392 

#50-1910 



83-3645 
101-4337 

#15-1197 
#15-1197 
#15-1197 



20-1249 

30-1633 

37-1787 

48-1908 

59-2140 

64-2354 

69-2697 

75-3186 

81-3462 

89-3962 

98-4240 

102-4346 

104-4392 

108-4553 



20-1249 
20-1249 

#63-2354 

#74-3186 

#90-4033 

#105-4517 

#50-1910 



84-3742 
102-4360 

#15-1197 
#15-1197 
#15-1201 



20-1249 

31-1642 

40-1882 

49-1909 

60-2150 

65-2427 

70-2729 

76-3242 

83-3563 

91-4033 

100-4300 

102-4346 

106-4517 

108-4553 



20-1249 
20-1249 

#64-2427 

#75-3242 

#92-4081 

#106-4535 

#50-1910 



85-3845 
103-4382 

#15-1197 
#15-1197 
#15-1202 



20-1249 

31-1653 

40-1882 

50-1910 

60-2150 

65-2427 

70-2729 

76-3242 

83-3563 

91-4033 

100-4300 

102-4346 

106-4517 

108-4553 



#65-2500 

#76-3299 

#94-4139 

#107-4553 

#50-1910 



27-1526 

32-1660 

40-188^ 

51-1^1 I 

61-<226 

66-c 

7^-2777 

77-1299 

84-3657 

93-4081 

100-4300 

103-4369 

106-4517 

109-4567 



#66-2544 

#78-3359 

#95-4169 

#108-4567 

#50-1910 



27-1531 

32-1675 

40-1882 

51-1911 

6' '2226 

66-2500 

7\'2777 

77-1299 

84-3657 

93-4081 

100-4300 

103-4369 

106-4517 

109-4567 



#67-2632 
#80-3462 
#97-4240 

#50-1910 



87-3935 89-4005 91-4072 



#15-1197 
#15-1197 
#15-1203 



#15-1197 
#15-1197 
#15-1204 



#15-1197 
#15-1197 
#15-1205 



MACRO CROSS 

MACRO NAME 

.tAPTB 

.SAPTH 

.SAPTY 

.SCATC 

.SCMTA 

.$DB20 

.$EOP 

.SERRO 

.SPOWE 

.SREAD 

.SSAVE 

.SSCOP 

.$TRAP 

.$TYP8 

.STYPD 

.$TYP£ 

.$TYPO 



CREATED BY MACRO OH 12-JAN-82 AT 



REFERENCE 

REFERENCES 
r20-1249 
1-1181 
;-1181 
-1179 
-1179 
-1182 
i-584 
-771 
-1180 
-1181 
i-1182 
-950 
-1180 
-1181 
-1180 
-1179 
-1180 



12:24 PAGE 20 
SEQUENCE 168 

CREF VOI 



*20-1249 
#18-1248 
43-1904 
16-1246 
19-1249 
*48-1909 
110-4609 
37-1787 
50-1911 
#40-1882 
#47-1908 
#36-1785 
49-1910 
#44-1905 
#46-1907 
#42-1903 
45-1906 



